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ABSTRACT 


Abstract  of  a  Report  to  the  Graduate  Committee  of 
the  Department  of  Civil  Engineering  in  Partial 
Fulfillment  of  the  Requirements  for  the  Degree  of 
Master  of  Engineering. 

COMPUTER  AIDED  DESIGN  OF  SOLDIER  PILE  AND  LAGGING 
RETAINING  WALLS  WITH  TIEBACK  ANCHORS 

By 

KEVIN  J.  D* AMANDA 
FALL  1991 

Chairman:  Dr.  Frank  C.  Townsend 

Major  Department:  Civil  Engineering 

Soldier  pile  and  lagging  walls  are  used  to  support 
open  excavations  and  restrict  lateral  movement!^.  They 
also  provide  an  increased  factor  o',  safety  to  nearby 
structures  and  utilities  against  excessive  deformations 
and  loss  of  bearing  capacity.  The  soldier  pile  and 
lagging  wall  consists  of  structure  H-beams  driven  into 
the  ground  with  wood  lagging  installed  between  the 
flanges  of  the  beams  to  retain  the  soil.  With  the  use 
of  tieback  anchors  as  bracing,  they  can  provide  an 
unobstructed  area  for  construction. 

The  design  of  the  soldier  pile  and  lagging  wall 
consists  of  developing  a  pressure  envelope  for  the  soil 
conditions  and  determining  the  number  and  location  of 


X 


^  the  anchors  for  a  given  H-beain*s  section  modulus.  The 
pressure  envelopes  for  braced  excavations  differ  from 
Rankine's  active  state.  A  braced  excavation  deforms 
more  laterally  at  the  bottom  of  the  excavation  than  the 
top  due  to  the  installation  of  the  anchors,  j  Peck 
(1969)  developed  pressure  envelopes  for  braced 
excavations  which  can  be  used  for  the  design  of  a 
retaining  wall. 

A  O-t-  language  computer  program  was  developed  to 
optimize  the  design  of  the  soldier  pile  and  lagging 
wall.  The  pressure  diagrams  for  sand  and  clays 
developed  by  Peck  and  tieback  anchor  capacity  curves 
from  the  Federal  Highway  Administration  were  used  in 
the  program.  Also  referenced  was  Naval  Facilities 
Engineering  Coimnand,  Design  Manual  7.2,  for  flexible 
wall  design.  /^By  varying  the  number  and  location  of  the 
tieback  anchors,  the  wall  design  may  be  optimized  for 
given  soil  conditions  and  wall  requirements.^^ 


CHAPTER  ONE 


INTRODUCTION 


1.1  Background 

Soldier  pile  and  lagging  retaining  walls  with 
tieback  anchors  are  used  to  support  open  construction 
excavations  and  restrict  lateral  movements  of  the 
surrounding  soil.  The  wall  provides  a  factor  of  safety 
to  nearby  structures  against  any  loss  of  bearing 
capacity  as  the  result  of  lateral  movements.  With  the 
use  of  tieback  anchors,  an  unobstructed  excavation  for 
construction  can  be  provided.  Figure  1.1  illustrates  a 
typical  soldier  pile  and  lagging  wall  with  tieback 
anchors.  The  basic  design  of  the  system  is  as  follows: 

a.  Determine  the  given  boundary  conditions 
indicating  soil  stratification,  water  level,  slope  of 
the  soil  behind  the  wall,  and  surcharge  loads. 

b.  Compute  the  lateral  earth  pressure  diagrams 
for  the  braced  excavation  including  any  pressure 
diagrams  from  surcharge  loads. 

c.  Design  the  components,  which  include  the 
soldier  pile;  wale;  tiebacks;  and  lagging,  based  on  the 
pressure  diagrams. 
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The  pressures  diagrams  for  braced  cuts  differ 
from  lateral  earth  pressures  obtained  by  Coulomb's  or 
Rankine's  theory.  Peck  (1969)  derived  lateral  earth 
pressure  diagrams  for  braced  cuts  in  sands  and  clays 
which  can  be  used  to  calculate  the  maximum  moment  and 
reaction  forces  for  the  design  of  the  retaining  wall 
system. 


Figure  1.1 

Tieback  Soldier  Pile  and  Lagging  Wall  for 
a  Cut-and-Cover  Station  in  Philadelphia 
(FHWA/RD-82/047,  1982) 
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The  basic  concept  of  bracing  an  excavation  is 
based  on  the  excavation  causing  the  removal  of  a  mass 
of  soil  and  water  from  a  site.  The  ground  water  table 
may  also  be  lowered  outside  and  below  the  excavation  to 
accomplish  the  construction.  Consequently,  these 
actions  will  result  in  a  total  stress  release  and 
movements  in  the  surrounding  soil.  A  retaining  wall  is 
typically  installed  to  control  these  movements. 
Satisfactory  performance  of  the  wall  requires  that  the 
excavation  periphery  not  have  any  excessive  movements 
or  deformations.  Moreover,  deformations  of  the 
surrounding  soil  may  be  limited  so  that  adjacent 
structures  and  utilities  are  not  adversely  affected. 

The  factors  that  influence  deformations  include  the 
dimensions  of  the  excavation,  soil  properties,  ground 
water  control,  time  (time  excavation  open,  time  a 
section  is  unbraced,  etc.},  support  system,  excavation 
and  bracing  sequence,  near-by  structures  and  utilities, 
and  transient  surcharge  loads.  (Lambe  and  Turner, 

1970) 

1.2  Computer  Program  Requirements 

The  design  of  soldier  pile  and  lagging  retaining 
walls  requires  the  determination  of  the  number  and 
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location  of  tieback  anchors  for  a  given  section  modulus 
of  a  soldier  pile  to  ensure  the  pile  is  not 
overstressed.  This  computer  program  was  developed  to 
calculate  the  maximum  moment  of  a  soldier  pile,  depth 
of  embedment,  and  reaction  forces  based  on  the  soil 
conditions,  depth  of  the  excavation,  and  location  of 
the  tieback  anchors.  By  varying  the  location  and 
number  of  the  anchors,  the  design  of  the  soldier  pile 
wall  may  be  optimized. 

The  computer  program  will  also  calculate  the 
required  anchor  capacities,  bonded  and  unbonded 
length  of  the  tieback  anchors,  and  the  section 
modulus  of  the  wale  system  based  on  anchor  spacing 
and  soil  type.  Tieback  capacity  and  length  is  based 
on  pressure  injected  tiebacks  in  cohesionless  soils 
and  post-grouted  tieback  anchors  in  cohesive  soils. 

1 . 3  Computer  Language 

The  computer  program  was  written  and  compiled  in 
Borland  Turbo  C-f-t-.  c  was  originally  developed  in  the 
1970's  for  use  with  the  UNIX  operating  system.  The 
definition  of  C  was  first  presented  in  The  C 
Programming  Language.  First  Edition  by  Brain  W. 
Kernighan  and  Dennis  M.  Ritchie  in  1978.  The 
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American  National  Standards  Institute  (ANSI) 
developed  a  new  standard  for  the  language  five  years 


later  which  resolved 
Users  Guide,  1991). 
ANSI  standard  for  C. 
registered  trademark 


ambiguities  in  it  (Turbo  C++ 
Turbo  C++  implements  the  latest 
It  is  manufactured  and  a 
of  Borland  International,  Inc. 
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CHAPTER  TWO 


BRACED  EXCAVATIONS  AND  TIEBACKS 


2.1  Braced  Excavations 

Braced  excavation  retaining  walls  are  used  to 
support  the  sides  of  temporary  excavations  in  various 
construction  applications.  The  vertical  face  of  the 
cut  is  held  open  by  the  retaining  structure  until  a 
permanent  structure  can  be  installed.  The  permanent 
structure  may  include  the  basement  of  a  building,  walls 
of  a  parking  garage,  or  underground  facilities.  The 
braced  structure  restricts  the  inward  movement  of  the 
surrounding  soil  preventing  settlement,  collapse  of  the 
excavation,  and  possible  bearing  capacity  failure  of 
nearby  structures.  Table  2.1  lists  the  factors  to  be 
considered  in  designing  a  braced  excavation.  The  most 
common  methods  of  supporting  a  temporary  excavation  are 
sheetpile  walls,  dril led-in-place  concrete  piles, 
slurry  walls,  and  soldier  pile  and  lagging. 

Sheetpiles  are  driven  into  the  ground  prior  to 
excavation,  interlocked  forming  a  wall,  and  then  the 
soil  excavated.  They  may  be  supported  by  struts  or 
anchors  as  required.  Dril led-in-place  piles  may  be 
used  with  a  spacing  so  that  lagging  is  not  required. 
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Table  2.1 

Steps  in  Engineering  an  Excavation 
(Lambe  and  Turner,  1970) 


Arching  of  the  soil  from  the  lateral  pressures 
developed  by  the  pile  will  retain  the  soil  across  the 
open  spacing  (Bowles,  1988).  A  slurry  wall  is 
constructed  when  concrete  is  cast-in-placed  in  a  cavity 
retained  open  by  a  slurry  liquid.  After  the  concrete 
cures,  the  soil  next  to  the  wall  is  excavated.  Soldier 
pile  and  lagging  uses  steel  H-piles  driven  into  the 
ground  prior  to  the  actual  excavation.  Lagging  is 
placed  between  the  piles  as  the  ground  is  excavated. 

The  lagging  may  be  either  wood  or  steel  members. 

Anchors  or  struts  are  used  to  support  the  wall  as  the 
excavation  proceeds. 

If  present,  ground  water  acts  against  the  wall  and 
thus  contributes  to  the  stresses  which  must  be  carried 
by  the  wall.  It  also  influences  the  effective  stress 
of  the  soil.  The  total  force  felt  by  the  wall  is  a 
combination  of  the  hydrostatic  force  and  the  effective 
soil  stress.  If  flowing  water  occurs,  a  seepage 
analysis  should  be  made.  Factors  which  must  be 
considered  in  a  seepage  analysis  includes  the 
permeability  of  the  insitu  soil,  leakage  through  the 
wall,  flow  parallel  to  the  wall,  excess  pore  pressures 
generated  by  changes  in  total  stresses,  seepage  forces, 
and  the  time  the  excavation  will  be  open  and  hence  the 
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degree  of  saturation.  The  actual  pore  water  pressures 
generated  will  typically  be  less  than  static  pressures. 
(Lambe  and  Turner,  1970) 

2.2  Soldier  Pile  and  Lagging 

The  procedure  for  constructing  a  soldier  pile  wall 
is  to  drive  the  H-piles  into  the  ground  prior  to  any 
excavating.  The  piles  are  driven  with  the  flanges 
parallel  to  the  proposed  cut.  They  are  usually  spaced 
between  four  and  ten  feet  apart.  When  they  have  been 
driven  down  to  the  desired  depth  (typically  five  to  ten 
feet  beneath  the  proposed  excavation  bottom  when  in 
soil),  the  excavation  begins  in  stages.  The  first 
stage  of  the  excavation  is  made  to  the  location  of  the 
uppermost  str^  .  or  anchor.  Timber  lagging,  cut  to  fit 
between  the  webs  of  adjacent  soldier  piles,  is  placed 
in  back  of  the  front  flanges  of  the  piles.  They  are 
set  one  piece  of  lagging  on  top  of  the  other  with  only 
a  small  spacer  between  them.  Straw  or  a  geotextile  may 
be  placed  between  and  behind  the  lagging  to  reduce 
seepage  through  the  wall.  Once  the  lagging  is  set 
down  to  the  first  strut  level,  a  horizontal  wale  is 
installed  against  the  piles  and  the  struts  or  anchors 
placed  at  the  desired  spacing.  The  excavation  then 
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proceeds  to  the  next  strut  level,  with  the  process 
continuing  until  the  final  excavation  is  reached. 
(Keorner,  1984) 

Primary  components  of  a  soldier  pile  and  lagging 
wall  are  as  follows: 

1.  Soldier  piles  which  may  be  either  steel  H- 
beams,  steel  tubular  pipes,  concrete  piles,  or  cast-in¬ 
place  concrete  piles. 

2.  Support  system  of  braced  struts  or  anchors. 
Anchors  may  be  cast-in-place  deadman,  piles  used  as 
anchors,  sheetpile  wall  sections,  or  tieback  anchors. 

3.  Wales  which  distribute  the  anchor  force  as 
a  line  load  between  the  soldier  piles.  They  are 
usually  structural  steel  sections. 

4.  Wood  or  metal  lagging  which  supports  the  soil 
between  the  piles.  (Boghrat,  1989) 

Advantages  of  using  soldier  pile  and  lagging  walls 
include  fewer  piles,  the  lagging  does  not  have  to  be 
extended  below  the  excavation  bottom,  and  the  soldier 
piles  can  be  driven  easier  in  hard  ground  than  can 
sheetpile  sections.  By  varying  the  spacing  of  the 
soldier  piles,  underground  utilities  may  be  avoided. 
Also  the  use  of  heavy  sections  for  piles  will  allow 
wider  spacings  of  wales  and  bracing.  (Merritt,  1976) 
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2.3  Tieback  Anchors 


Temporary  tieback  anchors  are  used  to  support  the 
sides  of  deep  excavation  retaining  structures.  Tieback 
systems  deform  less  than  strut  braced  excavations 
because;  (a)  a  force  at  or  above  the  active  earth 
pressure  is  locked  off  in  every  tieback,  (b)  tieback 
construction  does  not  require  over  excavation,  (c) 
tiebacks  are  not  subject  to  significant  temperature- 
caused  deformations  or  loads,  and  (d)  rebracing  is  not 
required  for  tieback  walls.  When  the  depth  of  the 
excavation  exceeds  fifteen  to  twenty  feet  and  the  width 
exceeds  sixty  feet  or  when  obstructions  significantly 
impact  construction,  tieback  walls  are  usually  less 
expensive  than  strut  braced  support  systems.  Tieback 
walls  provide  a  clean  open  excavation  for  construction. 
Internally  braced  walls  interfere  with  excavations, 
concrete  work,  structural  steel  placement,  and 
backfilling.  (FHWA/RD-82/047 ,  1982) 

Some  disadvantages  of  a  tieback  anchor  system  may 
include  obtaining  permission  for  the  placement  of  the 
anchors  in  the  property  of  a  municipality  or  a  private 
owner.  The  location  of  the  anchors  may  be  outside  the 
boundaries  of  the  project  where  soil  properties  were 
not  obtained.  Achieving  a  satisfactory  anchorage 
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capacity  in  soft  clays  or  submerged  sands  may  also  be 
difficult  to  achieve.  (Clough,  1972) 

The  capacity  of  tieback  anchors  is  dependent  on 
the  size  and  shape  of  the  anchor,  tendon  type  and  size, 
insitu  soil  properties,  and  installation  and  grouting 
method  of  the  anchor.  Design  of  a  tieback  system 
should  include  the  following: 

a.  a  tieback  feasibility  evaluation, 

b.  an  evaluation  of  the  risk  and  consequences 
of  failure, 

c.  the  selection  of  a  tieback  type, 

d.  the  estimation  of  the  tieback  capacity, 

e.  determination  of  the  unbonded  and  total 
tieback  length, 

f.  selection  of  a  corrosion  protection  system, 

g.  selection  of  a  tieback  testing  procedure, 

and 

h.  establishment  of  an  observation  and  monitoring 
system.  (PHWA/RD-82/047 ,  1982) 

Federal  Highway  Administration  report  number 
PHWA/RD-82/047 ,  Tiebacks .  provides  detailed  guidance 
and  design  procedures  for  tiebacks. 
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CHAPTER  THREE 


DESIGN  THEORY 

3.1  Lateral  Earth  Pressures  in  Braced  Excavations 
When  sufficient  yielding  of  a  retaining  wall 
occurs,  the  lateral  earth  pressure  can  be  approximated 
by  Coulomb's  or  Rankine's  theory.  However,  braced 
excavations  yield  differently  than  conventional 
retaining  walls.  Figure  3.1  depicts  the  different 
deflections  of  the  two  wall  types.  The  deformation  of 
a  braced  wall  gradually  increases  with  the  depth  of 
excavation.  The  variation  of  the  amount  of  deformation 
will  depend  on  the  type  of  the  soil,  depth  of  the 
excavation,  and  construction  of  the  wall. 


Retaining  Uall  Bracirq  Cut 


■Nature  of  Yielding  of  Retaining  Wall  and 

Braced  Cut  (Das,  1990) 

I  13 
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At  the  top  of  the  excavation,  deformations  are 
small  thus  the  lateral  earth  pressure  approaches  the  at 
rest  condition.  At  the  bottom  of  the  excavation,  the 
deformations  are  greater,  but  the  lateral  earth 
pressure  will  be  lower  than  Rankine’s  active  earth 
pressure.  Therefore  the  distribution  of  lateral  earth 
pressure  deviates  from  the  usual  linear  distribution 
(Das,  1990).  This  is  illustrated  in  Figure  3.2.  The 
total  force  exerted  against  the  wall  may  be  10-15% 
greater  than  active  condition.  The  state  of  stress 
behind  a  braced  excavation  has  been  described  as  an 
arching  active  condition  (Lambe  and  Whitman,  1969  and 
Cernica,  1982). 


Figure  3.2 

General  Pressure  Distribution  on  Braced 
Excavation  (Cernica,  1982) 
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The  pressure  envelopes  proposed  by  Terzaghi  and 
Peck  (1967)  and  as  recommended  by  NAVFAC  DM-7.2  (1982) 
are  assumed  for  the  design  conditions  within  the 
program.  The  earth  pressure  envelopes  for  braced  walls 
in  sands,  soft  clays,  and  stiff  clays  are  illustrated 
in  Figure  3.3.  For  stiff  clays,  NAVFAC  DM-7.2  (1982) 
recommends  horizontal  stresses  between  0.2  and  0.4*^  H. 
The  value  of  0.47(H  is  used  within  the  program.  The 
stability  number  is  calculated  as  N,  =  "TSH/c.  Where'S 
is  the  unit  weight  of  the  soil,  H  is  the  depth  of  the 
excavation,  and  c  is  the  undrained  shear  strength  of 
the  soil.  Characteristics  of  these  pressure  envelopes 
include: 

a.  They  apply  to  excavations  deeper  than  twenty 

feet . 

b.  The  pressure  envelopes  assume  the  water  table 
is  below  the  bottom  of  the  cut.  Sands  are  assumed  to 
be  drained  with  the  lowering  of  the  ground  water  table 
behind  the  wall.  Clays  are  assumed  undrained  and  under 
short-term  conditions. 

c.  Lateral  stresses  are  apparent  stresses  which 
are  to  be  used  for  the  calculations  of  the  reaction 
loads . 
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d.  The  behavior  of  an  excavation  in  clays  depends 
on  its  stability  number.  (Lambe  and  Turner,  1970) 


SAND  SOFT  -  riEDIUn  STIFF  CLAY 

CLAY 


0.65Ka  I  ut  *  H  Ka  »  ut  »  H  0.1  *  ut  *  H 

Ka  =  1  -  (1c/ul*H> 

Figure  3.3 

Pressure  Distributions  on  Braced  Excavations 
(NAVPAC  DM- 7. 2) 

The  apparent  stresses  are  for  entire  sand  or  clay 
layering  only.  Engineering  judgment  should  be  used  for 
tills,  silts,  or  fills;  varying  soil  type  with  depth; 
and  when  hydrostatic  stresses  act  on  the  wall. 

Lambe  and  Turner  (1970)  concluded  that  predicting 
the  behavior  of  braced  excavations  cannot  be  made  with 


complete  confidence.  This  is  the  result  of  difficulty 
in  selecting  the  proper  soil  parameters,  field  boundary 
conditions,  and  the  details  of  construction.  However, 
Ulrich  (1989)  concluded  that  the  recorded  pressures  for 
overconsolidated  clays  agree  with  those  developed  by 
Peck  (1969).  Ulrich  also  noted  that  soil 
stratification  does  not  have  a  significant  influence  on 
the  apparent  earth  pressure  in  overconsolidated  clays. 
In  another  case  study  in  Washington  D.C.  where  the  soil 
stratification  was  layers  of  sands,  silty  sands,  and 
stiff  silty  clays,  the  measured  earth  pressures  fell 
within  the  apparent  earth  pressure  envelope  of  0.2'yH 
for  clays  (Chapman  et  al . ,  1972).  Results  from  other 
excavations  in  the  Washington  area  revealed  that  the 
apparent  earth  pressure  coefficient  varied  with  the 
depth  of  the  cut.  A  value  of  O.ISYh  for  a  thirty  foot 
cut,  0.2  Yh  for  a  forty  to  fifty  foot  cut,  and  0.231SH 
for  a  sixty  foot  cut  (Chapman  et  al.,  1972).  The 
design  of  braced  cuts  is  predominately  based  on 
pressure  diagrams  derived  empirically  as  a  result  of 
field  tests.  Sound  engineering  judgement  should  be 
used  in  determining  the  applicability  of  a  given 
pressure  diagram  for  a  particular  cut. 
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3.2  Active  and  Passive  Earth  Pressures 

For  the  initial  two  stages  of  construction,  the 
soldier  pile  wall  will  develop  earth  pressures 
approaching  the  active  and  passive  states.  In  granular 
soil,  the  soil  is  assumed  to  be  drained  and  active 
earth  pressures  are  developed  as  the  wall  deforms 
laterally.  This  is  resisted  by  the  passive  resistance 
which  is  developed  as  the  H-beam  compresses  the  soil 
acting  on  an  effective  area  of  three  times  the  width  of 
the  H-beam  below  the  bottom  of  the  excavation.  However 
there  exists  some  uncertainty  of  how  the  pressures  act 
at  and  below  the  excavation  line  (Bowles,  1988).  The 
active  and  passive  earth  pressure  coefficients  are 
calculated  assuming  Rankine's  theory. 

In  the  case  of  cohesive  soils,  undrained 
conditions  (i  =  0)  are  assumed  with  no  frictional 
resistance  developed.  The  stresses  in  the  tension  zone 
are  neglected  in  the  design  computations  with  the  depth 
of  the  tension  zone  taken  as  z^  =  (2*c-q)/  y  . 


Hydrostatic  pressure  is  calculated  as  the  unit 
weight  of  water  (62.4  pcf)  multiplied  by  the  height 
of  the  water  table.  It  is  assumed  in  the  program 


that  sand  and  gravels  are  drained  and  the  water  table 
will  be  drawn  down  to  the  bottom  of  the  excavation  by 
natural  seepage  or  mechanical  dewatering.  This  is 
illustrated  in  Figure  3.4.  Clay  layering  is  assumed  to 
be  undrained  and  analyzed  using  either  a  total  or 
effective  stress  analysis  approach. 


Grcund  Surface 

SfWO  -  (PAINED 

— ► 

Original  Ground  Uater  Surface  V 

S  Bottai  o(  Cu( 

. — 

Uater  table  draun  doun  to 
bottoi  of  cut  due  to  seepage 
through  tutor  sheeting  or 
mechanical  deuatering. 

Figure  3.4 

Draw  Down  of  Ground  Water  Table  in  Sands 
due  to  Natural  Seepage  or  Mechanical 
Dewatering  (NYCTA,  1974) 


3.4  Total  versus  Effective  Stress  Analysis 

Some  question  on  how  to  analyze  the  wall  is  raised 
when  the  ground  water  table  is  located  above  the  bottom 
of  the  excavation  in  clay  layering.  The  apparent 
lateral  earth  pressure  envelopes  proposed  by  Peck  are 
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based  on  empirical  data  from  total  stress  analyses. 

The  use  of  a  buoyant  unit  weight  rather  than  the  total 
unit  weight  of  the  soil  and  superimposing  hydrostatic 
pressure  onto  the  earth  pressure  diagrams  change  the 
analysis  to  an  effective  stress  analysis  approach. 
However  the  total  stress  soil  parameter  of  undrained 
shear  strength  is  still  used.  Therefore  this  effective 
stress  analysis  approach  is  not  entirely  correct. 

Either  a  total  or  effective  stress  analysis 
approach  may  be  used  to  design  the  wall.  In  the  case 
of  a  total  stress  analysis,  the  saturated  unit  weight 
above  and  below  the  water  table  should  be  entered.  For 
an  effective  stress  analysis  approach,  the  saturated 
unit  weight  above  the  water  table  and  the  buoyant  unit 
weight  below  the  water  table  should  be  used.  The 
location  of  the  ground  water  table  for  the  effective 
stress  analysis  must  therefore  be  located  above  the 
bottom  of  the  cut. 

Generally,  the  results  from  using  the  total  unit 
weights  (total  stress  approach)  are  more  critical 
loading  conditions  than  the  approach  adapted  by  using 
buoyant  unit  weights  (Liao  and  Neff,  1990). 
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3.5  Surcharge  Pressure  due  to  a  Strip  Load 


To  account  for  the  lateral  pressures  due  to  a 
strip  surcharge  load  located  at  some  distance  from  the 
wall  face,  an  equivalent  uniformly  distributed  pressure 
acting  on  the  wall  is  developed.  The  total-  force 
exerted  by  the  strip  load  on  the  wall  is  calculated  and 
then  converted  to  a  uniform  pressure  by  dividing  the 
total  force  by  the  height  of  the  wall.  The  force  is 
calculated  by  the  equations  derived  by  Jarquio  (1981) 
and  as  illustrated  in  Figure  3.5. 


FROM: 


P  =  2  q  «  h  /  pi  «  <02  -  91  ) 
02  =  arcian  [  (  a  +  b  )  /  h  ] 
01  =  arctan  [  b  /  h  1 


T  0  : 


Figure  3.5 

Conversion  of  Strip  Surcharge  Load  to  an  Uniform  Pressure 
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3.6  NAVFAC  DM-7.2  Recommendations  on  Flexible  Wall 
Design 

The  following  recommendations  from  Naval 
Facilities  Engineering  Command,  Design  Manual  7.2 
(1982)  were  considered  in  the  programming. 

a.  The  total  resistance  force  acts  on  an 
effective  area  of  three  times  the  flange  width  of  the 
pile  (3*bf)  as  shown  in  Figure  3.6.  This  is  to  account 
for  the  differences  between  the  failure  in  soil  of  an 
individual  pile  element  and  that  of  a  continuous  wall 
for  which  pressure  distributions  were  derived. 


Figure  3.6 

Effective  Width  of  Soldier  Pile  that  Passive 
Pressure  Acts  Upon  (NYCTA,  1974) 

b.  For  temporary  construction,  a  factor  of  safety 
of  1.5  should  be  applied  to  passive  pressures.  This 
option  is  available  within  the  program  but  it  is  not 
recommended.  Passive  resistance  is  calculated  using 
Rankine's  theory  which  is  already  conservative  compared 


to  a  logarithmic  spiral  failure  surface  approach  to 
estimate  passive  resistance. 

c.  Neglect  the  soil  resistance  to  a  depth  of  1.5 
times  the  pile  width  from  the  bottom  of  the  excavation 
for  clays  and  the  depth  of  the  pile  width  for  sands. 
This,  however,  is  not  accomplished  in  the  program.  It 
was  considered  that  significant  conservativeness 
already  exists  within  the  wall  design. 

d.  The  required  depth  of  embedment  is  calculated 
based  on  controlling  the  moment  within  the  section  to 
ensure  the  pile  is  not  overstressed  at  the  final 
anchor  location.  The  active  soil  pressure  will  be 
resisted  by  the  passive  pressure  and  the  allowable 
moment  of  the  section. 

3.7  Other  Design  Considerations 

Other  design  considerations  included  within  the 
program  are: 

a.  To  calculate  the  anchor  reactions,  it  is 
assumed  the  piles  are  hinged  at  the  bottom  of  the 
excavation  and  at  all  the  anchor  locations  except  the 
upper  anchor.  The  soldier  pile  between  each  pair  of 
hinges  is  assumed  to  be  a  simply  supported  beam 
(Bowles,  1988  and  Das,  1990). 
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b.  An  allowable  stress  for  the  steel  soldier 
piles  of  28,800  psi  is  used  to  calculate  the  required 
section  modulus. 

c.  Wales  are  designed  assuming  they  act  as  simply 
supported  beams,  pin-ended  with  maximum  moments  equal 
to  w*lV8.  This  moment  is  then  increased  by  33%  to 
allow  for  overstressing  during  preload  testing  of  the 
anchors.  An  allowable  stress  for  the  steel  of  28,800 
psi  is  used  to  calculate  the  section  modulus  from  the 
maxim\im  moment . 

3.8  Design  Methodology  for  Wall  Analysis 

For  the  first  two  stages  of  construction,  the 
active  and  surcharge  forces  are  being  resisted  by  the 
passive  and  reaction  (stage  two)  forces.  The  reaction 
force  is  calculated  by  svimming  moments  about  the  point 
of  net  zero  forces  on  the  embedded  pile  assuming  it  is 
hinged  there  and  thus  zero  bending  moment.  The  maximum 
moment  within  the  pile  can  be  calculated  by  svimming  the 
moments  about  the  point  of  zero  shear.  From  the 
maximum  moment,  the  required  section  modulus  is 
calculated.  The  embedment  depths  are  calculated  for 
stage  one  by  determining  the  point  where  the  net  moment 
is  zero  and  for  stage  two  by  assuming  fixity  at  the 
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anchor  location  and  siimning  moments  there  so  the  pile 
is  not  overstressed.  For  clays,  the  stresses  within 
the  tension  zone  are  neglected  in  the  calculations. 
The  force  diagrams  are  illustrated  in  Figures  3.7  and 
3.8  for  sands  and  clays  respectively. 


Figure  3.7 

Force  Diagram  for  Stage  Two  of  Construction  in  Sands 


Uith  Tension  2an»:  Uithout  Tension  Zone; 


(q-2c>as 


*  <  <c/fs  *2c-q-utiH>Bbf«0 


Figure  3.8 

Force  Diagram  with  and  without  a  Tension 
Zone  for  Stage  Two  of  Construction  in  Clays 
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Kiewit  design  procedures  are  also  used  to 
calculate  the  tnaxitnum  moments  and  reaction  force  for 
the  initial  two  stages  of  an  excavation.  Kiewit 
procedures  were  developed  by  Peter  Kiewit  Sons* 

Company  based  on  empirical  data  and  field  results. 

In  the  first  stage,  it  is  assumed  that  a  pinned 
connection  exists  in  the  pile  two  feet  below  the 
bottom  of  the  excavation.  The  maximum  moment  is 
calculated  at  this  point.  In  the  second  stage,  the 
maximum  moment  is  taken  as  M  =  w*lV9.  Where  w  is  the 
average  pressure  on  the  span  from  the  first  anchor  to 
the  bottom  of  the  cut  and  1  is  the  distance  between  tlie 
anchor  and  the  bottom  of  the  cut.  The  reaction  force 
is  calculated  assuming  pinned  connections  at  the  anchor 
location  and  the  bottom  of  the  cut. 

the  second  anchor  is  in  place,  the  pressure 
^^®^*^i^^tion  will  correspond  to  those  for  braced  cuts. 
Reaction  forces  are  calculated  by  assuming  pinned 
connections  and  summing  moments  about  the  anchor 
locations.  Next  the  point  of  zero  shear  is  found  and 
moments  summed  about  it  to  calculate  the  maximum 
moment.  The  pressure  diagram  for  sands  is  depicted  in 
Figure  3.9  and  in  Figures  3.10  and  3.11  for  clays. 
Embedment  depth  is  determined  by  summing  moments  at  the 
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last  anchor  point  assuming  fixity  so  the  pile  is  not 
overstressed.  This  is  illustrated  in  Figure  3.12  for 
sands . 


siqs  <>igh 


Figure  3.9 

Pressure  Diagram  for  Stage  Three  of  Construction 

in  Sands 


pp  ntt  =  (Cc/(s  ^  2c  -  q)  ■  b( 


Figure  3.10 

Pressure  Diagrams  for  Stage  Three  of  Construction 

in  Stiff  Clays 


Figure  3.11 

Pressure  Diagram  for  Stage  Three  of  Construction 
in  Soft  to  Medium  Clays 


Umax 


Figure  3.12 

Force  Diagram  for  Determining  the  Embedment  Depth  in 
in  Sand  Assuming  Fixity  about  the  Last  Anchor  Location 
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In  cohesionless  soils,  the  tieback  anchor 
capacity  is  calculated  assuming  pressure  injected 
tiebacks  using  an  effective  grout  pressure  in  excess 
of  150  psi.  Figure  3.13  shows  curves  developed  by 
Ostermeyer  (1975)  as  an  function  of  length  and  soil 
type.  An  average  of  these  values  was  used  to  develop 
equations  for  each  soil  type  to  calculate  anchor 
capacity  in  the  program.  These  values  assximed  anchor 
diameters  between  four  to  six  inches  and  a  depth  of 
overburden  greater  than  thirteen  feet. 

In  cohesive  soils,  tieback  capacity  is  based  on 
post-grouted  anchors  with  grout  pressures  in  excess  of 
150  psi.  Figure  3.14  illustrates  tieback  capacity 
based  on  clay  consistency.  An  anchor  diameter  of  six 
inches  was  assumed  to  calculated  tieback  capacity. 

3.10  Minimum  Unbonded  and  Total  Anchor  Length 

The  unbonded  length  of  the  anchor  is  calculated 
based  on  locating  the  bonded  length  of  the  anchor 
outside  the  failure  zone  behind  the  back  of  the  wall. 
The  location  of  the  failure  zone  is  based  on  using 
the  failure  surfaces  from  Rankine's  theory.  Report 
number  FHWA/RD-82/047  recoiranends  that  the  length  of 
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Figure  3.13 

Load  Capacity  of  Anchors  in  Cohesionless  Soil 
Showing  the  Effects  of  Relative  Density, 
Gradation,  Uniformity,  and  Anchor  Length 
(PHWA/RD-75/128,  1976) 
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ClaL)  Consistencij 


Figure  3.14 

Effect  of  Post-Grouting  on  Anchor  Capacity  in 
Cohesive  Soils  (PHWA/RD-75/128 ,  1976) 
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the  anchor  be  of  sufficient  length  to  locate  the  anchor 
in  soil  which  would  not  be  affected  by  movement  of  the 
wall.  The  unbonded  length  should  place  the  anchor 
beyond  the  critical  failure  surface  as  illustrated  in 
Figure  3.15.  Also  recommended  is  a  minimum  unbonded 
length  of  fifteen  feet  to  avoid  load  losses  as  a  result 
of  long  term  steel  relaxation,  creep  in  the  soil, 
anchorage  seating  losses,  and  structural  deformation. 


Critical  Failure  Surface 


Througi  the  Ends  of  the  Tiebacks 


Figure  3.15 

Determination  of  the  Unbonded  and  Total  Tieback 
Length  (FHWA/RD-82/047 ,  1982) 


The  total  anchor  length  should  be  of  sufficient 
length  to  ensure  a  satisfactory  factor  of  safety 
against  sliding  along  the  most  critical  failure 
surface  through  the  ends  of  the  anchors.  If  the  factor 


32 


of  safety  is  insufficient,  the  total  anchor  length 
should  be  increased  (PHWA/RD-82/047 ,  1982).  This  is 
also  illustrated  in  Figure  3.15. 

This  computer  program  does  not  calculate  the 
factors  of  safety  against  failure  of  the  tendons, 
failure  in  the  anchor  zone,  or  overall  external 
stability  against  wall  failure.  Boghrat  (1989) 
recommends  the  use  of  the  STABL  computer  program  to 
calculate  of  the  total  anchor  length  to  achieve  a 
minimum  factor  of  safety.  The  user  manual  for  PCSTABL4 
is  presented  in  the  Federal  Highway  Administration 
Report  No.  FHWA-TS-85-229  (Carpenter  and  Kopperman, 
1985) . 

3.11  Lagging  Thickness 

The  required  thickness  of  the  wood  lagging  can 
be  estimated  from  Table  3.1  from  report  number 
FHWA/RD-75/128  (1976).  The  table  is  based  on  soil 
type,  depth  of  the  cut,  and  soldier  pile  spacing. 
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Table  3.1 

Recommended  Thickness  of  Wood  Lagging,  Construction  Grade  Lumber 

(FHWA/RD-75/128,  1976) 
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Note:  In  the  categorg  o<  potentiallg  dangerous  soils  ,  use  o<  lagging  is  questionable. 


CHAPTER  POUR 


COMPUTER  PROGRAM 

4.1  Program  Flow  and  Logic 

The  computer  program  logic  and  flow  is  illustrated 
in  the  flow  charts  shown  in  Figure  4.1.  Appendix  A 
contains  the  variable  nomenclature  for  the  program  and 
the  actual  program  file  is  included  in  Appendix  B. 
Appendix  C  contains  various  calculations  and  equations 
used  within  the  analysis  functions  in  the  program. 

4.1.1  Main  Function 

The  program  starts  with  the  main  function  which 
includes  the  main  menu  and  exit  routines.  The  main 
menu  routine  displays  the  main  menu  screen  which 
prompts  the  user  to  input  the  next  step.  The  options 
include  enter  soil  and  wall  data,  read  data  from  an 
existing  file,  edit  the  input  data,  save  the  data  in  a 
file,  execute  the  wall  analysis,  execute  the  anchor  and 
wale  analysis,  save  the  analysis  results,  or  exit 
the  program.  The  program  will  execute  the  appropriate 
function  upon  input.  The  program  will  request 
verification  before  exiting. 
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flAIN  riENU 

Enter  Sojl  Properties  8  Uall  Data 
Pead  Data  Eron  an  Existing  File 
Edit  Inputted  Data 
Save  Inputted  Data 
Execute  Uall  Analysis 
Execute  f^hor  /  Uale  Analysis 
Save  Analysis  Data  in  Output  File 
Exit  Progran 


Input  Next  Step 


Exit 

JJroqran  . 


Figure  4.1 

Computer  Program's  Flow  Chart 
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Figure  4.1  (Continued) 
Computer  Program's  Flow  Chart 
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Figure  4.1  (Continued) 
Computer  Program's  Flow  Chart 


I 


ay 


ANCHOR  FUNCTION 


Calculate  Uale  Section  ftodulus 
S=Rli  ][jjid'2  /  M.1  s 


I 


Calculate  Anchor  Capacittj 
1^1  =  RCilCj]  ■  d  /  s  ■  cos 


I 


/IMPUT: 

f-  Spacinq  of  Anchors 
Inclination  of  ftidnrs 
Soil  Tqpei 

1.  Tine  to  Asdiia  Sand 

2.  IMiiw  to  Coarse  Sand 

3.  Samt^  Gravel 
1.  IMiua  Clav 

5.  Aediue  to  Stiff  Claij 

6.  Stiff  Clay 

7.  Stiff  to  Uery  Stiff  Clay 

8.  Uery  Stiff  Clag 

9.  Uery  Stiff  to  Hard  Clay 


Calculate  ftidnr  Length 


Calculate  UrbondMl  Length 


£ 


3- 


Output  froti  Analysis: 

Anchor  Section  Anchor 
Row  Hodulus  Capacity 


I 


Anchor  Uhbonded 
Length  Length 


nfllN  MENU 


Figure  4.1  (Continued) 
Computer  Program's  Plow  Chart 
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Figure  4.1  (Continued) 
Computer  Program's  Flow  Chart 
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Figure  4.1  (Continued) 
Computer  Program's  Flow  Chart 
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ANALYSE 
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Othririn*  Dtplh  of  Flrtf  Cut 


WT.C-C8  FUNCmN 


Dttvmfew  Otpih  of  Cut 


WT_C_C8  nJNCTOM 


X  «  \ 
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Dotsririm  D  by  Suiwning  Mamnti  (teut  ANC{0] 

CdcuWo  Mm  a«f  Rl  uUng  lOMril  Critorlo 


.num  >  t 


RUum  to  ANALYSE  nMCTOi 


Stag!  1114 


I  «•  MMLYSB  FUCTDM 


Figure  4.1  (Continued) 
Computer  Program's  Flow  Chart 


4.1.2  Data  Functions 


The  data  functions  will  input,  read,  edit,  and 
save  the  input  data  or  save  the  analysis  results.  The 
input  function  prompts  the  user  for  the  input  of  the 
various  wall  and  soil  data.  The  read  function  prompts 
the  user  for  the  filename  of  the  data.  If  the  file 
does  not  exist  in  the  working  directory,  an  error 
message  is  displayed  and  it  requests  the  filename  be 
reentered  or  the  function  aborted.  Upon  finding  the 
file,  the  data  is  read  and  entered  into  the  appropriate 
program  variables.  The  view  data  function  displays  the 
wall  and  soil  data  and  requests  if  any  changes  are 
desired.  If  a  change  is  desired,  the  number  of  the 
item  and  then  its  new  value  are  entered.  The  save  data 
function  will  save  the  input  data  in  a  DOS  file  in  the 
working  directory.  If  the  file  already  exists, 
verification  will  be  requested  before  coping  over  it. 
Lastly,  the  save  function  will  save  the  results  of  the 
analysis  in  a  DOS  file.  The  save  routine  will  request 
the  filename  and  verification  before  coping  over  an 
existing  file.  After  executing  a  particular  routine, 
the  program  returns  to  the  main  menu. 
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4.1.3  Analysis  Functions 

The  next  series  of  functions  perforin  the  various 
analysis  calculations.  The  analysis  function  requests 
entry  of  the  estimated  thickness  of  the  pile,  the 
factor  of  safety  against  passive  pressure,  and  the 
depth  of  over-excavation  below  an  anchor  depth. 
Following  input,  the  function  determines  the  soil  type 
and  executes  either  the  sand  analysis  or  clay  analysis 
fxmction.  After  executing  the  sub-function  and 
completing  the  calculations,  flow  is  returned  to  the 
analysis  function  and  the  results  are  displayed. 

The  sand  analysis  function  executes  its  analysis 
in  three  stages.  The  first  stage  is  for  the  initial 
stage  of  excavation  before  the  first  anchor  has  been 
installed.  It  calculates  the  point  of  zero  shear, 
maximum  moment  at  the  point  of  zero  shear,  required 
section  modulus  from  the  maximum  moment,  and  the  depth 
of  embedment  at  the  point  of  zero  bending  moment.  Stage 
two  is  for  the  second  stage  of  excavation  after  the 
first  anchor  is  installed.  It  calculates  the  same 
items  as  stage  one  plus  the  reaction  force.  The 
embedment  depth  is  based  on  not  overstressing  the 
pile  at  the  anchor  location  assuming  fixity  there. 
Additionally  for  the  first  two  stages,  the  moments 
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and  reaction  force  are  calculated  using  the  Kiewit 
criteria.  Stage  three  is  executed  for  the  stages  of 
construction  after  the  second  and  thereafter  anchors 
are  installed.  The  pressure  distributions  for  braced 
cuts  are  used  in  this  stage.  The  reaction  forces, 
point  of  zero  shear,  maximum  moment,  and  required 
section  modulus  are  calculated  in  the  function.  The 
embedment  depth  is  calculated  by  calling  the  sub¬ 
function,  ''min_D''.  It  calculates  the  embedment  depth 
from  the  maximum  moment  for  each  particular  stage. 
After  the  final  stage  is  completed,  the  minimum 
embedment  depth  is  calculated  from  the  maximum  moment 
for  all  the  stages  of  construction.  The  sand  analysis 
function  uses  the  function  "ka_kp''  to  calculate  the 
average  unit  weight,  friction  angles,  and  coefficients 
of  passive  and  active  earth  pressures.  The  base 
friction  angle  and  imit  weight  are  the  properties  of 
the  soil  layer  at  the  bottom  of  the  excavation. 

If  the  soil  type  is  clay,  the  function  clay 
analysis  is  executed.  It  performs  essentially  the 
same  calculations  as  the  sand  analysis  function.  It 
first  determines  the  location  of  a  tension  zone,  if 
it  exists,  and  excludes  the  stresses  within  it  from 
any  calculations.  Also  it  verifies  the  soil  will 


46 


support  the  excavation  based  on  the  net  passive 
resistance  of  the  structure  being  greater  than  zero 
(Pujt  =  6c/fs  +  2c  -  q  >  0).  An  error  message  is 
displayed  if  it  will  not.  In  the  third  stage  routine, 
the  stability  number  of  the  cut  is  calculated  and  the 
pressure  diagram  corresponding  to  the  stability  number 
determined.  The  function  '*ca_cb_wt”  is  used  to 
calculate  the  average  unit  weight  and  shear  strength  of 
the  cut  and  the  base  shear  strength.  The  base  shear 
strength  is  calculated  from  an  average  over  a  depth 
twenty  feet  below  the  bottom  of  the  excavation. 

Both  the  sand  and  clay  analysis  functions  use  the 
function  "strip"  to  convert  a  strip  surcharge  load  to 
an  equivalent  uniform  surcharge  load.  This  surcharge 
load  is  then  included  in  the  design  calculations. 

The  anchor  analysis  function  is  used  to  calculates 
the  section  modulus  of  the  wale  for  each  row  of 
anchors,  the  required  anchor  capacity,  the  bonded 
anchor  length  based  on  soil  type  and  anchor  capacity, 
and  the  unbonded  anchor  length.  Prior  to  the  actual 
analysis,  anchor  spacing;  the  inclination  angle  of  the 
anchors;  and  soil  type  are  entered.  After  completion 
of  the  various  calculations,  the  results  are  displayed 
before  the  program  returns  to  the  main  menu. 
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4.2  Assumptions  and  Limitations 

1.  The  coefficient  of  passive  earth  pressure  is 
calculated  assuming  Rankine's  theory  which  is 
conservative  compared  to  a  logarithmic  spiral  failure 
surface  approach  in  estimating  the  passive  resistance. 

2.  An  average  unit  weight  and  friction  angle  (or 
cohesion)  for  the  cut  is  used  in  the  soil  pressure 
calculations.  The  base  values  for  sands  are  the 
properties  of  the  sand  layer  at  the  bottom  of  the 
excavation.  For  clay  layering,  the  base  value  for 
cohesion  is  calculated  by  averaging  the  cohesion  values 
over  a  twenty  foot  depth  below  the  bottom  of  the 
excavation.  This  is  to  accoimt  for  soft  or  stiff 
layers  just  below  the  bottom  of  the  excavation.  The 
difference  between  a  soft  and  very  stiff  clay  layer  is 
more  significant  than  that  between  a  loose  and  dense 
sand.  It  is  recomnended  only  minimal  soil  layering  be 
used. 

3.  A  cut  of  entirely  sand  or  clay  layering  is 
assumed  in  the  program.  The  computer  program  will 
not  accept  mixed  soil  layering  or  silts.  As  an 
alternative,  an  equivalent  value  of  cohesion  for  a 
sand  layer  may  be  averaged  with  a  cohesion  value  of 
the  clay  layer  as  follows: 
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c„  =  [  '^  +  (H-H,)*n'*q„  ]  /2H. 


Where,  H 

total  height  of  the  cut. 

Hs 

= 

height  of  the  sand  layer. 

= 

unit  weight  of  the  sand  layer. 

= 

lateral  earth  pressure  coefficient  for 

the  sand  layer  (**!), 

i 

= 

angle  of  friction  of  the  sand  layer. 

= 

unconfined  compression  strength  of  clay 

and 

n' 

= 

coefficient  of  progressive  failure 

(ranges  from  0.5  to  1).  (Das,  1990) 

With  the  average  unit  weight  for  the  cut,  the 
pressure  diagrams  for  clays  can  then  be  used  to  design 
the  wall.  NYCTA  (1974)  recommends  an  alternate  method 
where  the  pressure  diagrams  are  calculated  using 
Rankine's  earth  pressure  theory  for  the  individual 
layers  and  an  average  uniform  pressure  over  the  entire 
wall  calculated  from  these  pressures. 

4.  Sands  are  assumed  to  be  drained  with  the  water 
table  being  drawn  down  below  to  the  bottom  of  the 
excavation.  If  the  cut  is  not  drained  or  the  water 
table  is  not  drawn  down,  the  hydrostatic  pressure 
should  be  included  in  the  calculations. 
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5.  For  clays,  short-term  undrained  conditions  are 
assumed.  If  drainage  may  occur  as  in  the  cases  of 
long-term  construction  (partially  drained)  or  post¬ 
construction  (fully  drained),  an  effective  stress 
analysis  should  be  accomplished  using  effective  stress 
parameters  (c*  and  i').  Drained  conditions  for  clays 
are  usually  more  critical  than  undrained  conditions. 

6.  The  assumption  that  the  wall  acts  as  a  series 
of  pinned  beams  is  conservative  compared  to  assuming  a 
continuous  beam  and  analyzing  it  using  a  finite 
element  approach. 

7.  The  program  does  not  calculate  the  overall 
stability  of  the  structure.  Most  probable  failure 
surfaces  should  be  checked  to  ensure  a  satisfactory 
factor  of  safety. 

8.  The  program  does  not  check  the  stability  of 
the  base.  Seepage  forces  should  also  be  considered  if 
present  to  check  for  quick  conditions. 

9.  Anchor  capacity  is  based  on  field  testing  of 
pressure  injected  tiebacks  in  cohesionless  soils.  The 
capacity  curves  used  were  developed  with  the  majority 
of  anchors  less  than  eight  meters  and  most  were  not 
tested  to  their  ultimate  capacity  (PHWA/RD-82/047 , 
1982).  For  cohesive  soils,  post-grouted  tiebacks  are 


50 


assvuned.  The  mechanism  by  which  post-grouted  tiebacks 
develop  their  capacity  is  not  entirely  understood. 
Increases  in  capacity  of  25%  to  over  300%  are  possible 
depending  on  the  soil  type  and  the  post-grouting  method 
(PHWA-RD-82-047 ,  1982).  The  curves  used  represent  a 
wide  range  of  values  and  an  average  of  these  values  is 
used  to  calculate  capacity.  The  actual  field 
capacities  of  the  tiebacks  should  be  verified  in  the 
field. 

10.  Wale  design  is  conservatively  calculated  based 
on  assuming  pinned  ends  at  the  anchor  locations. 

4.3  Example  Problems 

Examples  problems  for  sand  and  clay  layering, 
with  and  without  a  ground  water  table  present  are 
included  in  Appendix  D.  The  solutions  are  compared  to 
the  computer's  solutions  to  ensure  reasonable  results 
are  produced  by  the  program. 
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CHAPTER  FIVE 


USER'S  GUIDE 

5.1  Program  Start-Up 

The  program  may  be  run  either  on  the  computer's 
hard  drive  or  one  of  its  floppy  drives.  From  the  DOS 
prompt,  change  the  command  prompt  to  the  drive  and 
directory  on  which  the  program  is  located.  Then  type 
SOLDIER  and  press  enter  to  start  the  program.  The 
program  starts  up  and  displays  the  main  menu  shown  in 
Figure  5.1. 


Figure  5.1 
Main  Menu  Screen 


Design  of  Soldier  Pile  and  Lagging 
In  Accordance  with  NAVFAC  DM-7 


MAIN  MENU 

1.  Enter  Soil  Properties  and  Wall  Data 

2.  Read  Data  From  an  Existing  File 

3.  Edit  Input  Data 

4.  Save  Input  Data 

5.  Execute  Wall  Analysis 

6.  Execute  Anchor\Wale  Analysis 

7.  Save  Analysis  in  an  Output  File 

8.  Exit  Program 

Your  Choice?  -- 
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The  user  then  should  enter  the  next  step,  usual  1 
enter  or  read  data.  The  description  of  the  required 


input  data  is  listed  in  the  next  section.  The 
I  analysis  functions  can  only  be  executed  after  the 

data  have  been  entered. 

■  5.2  Input  Data 

The  following  data  shall  be  entered  for  the 

■  various  analysis  functions.  Figure  5.2  illustrates 
various  input  data. 

m 

H  Top  CUvat  ion 

_  (Mvr  Elevation 

^^xhor  Clwation 


I  Anchor  Elavation 

Botto*  Clavalion 

I  'VX^ 

®  Figure  5.2 

Input  Variables  for  Hall  Analysis 

P 

I 


Oistanca  Iroa  uall 


to  strip  load 
Surcharge  Load 


Strip  Load 


Lager  1: 

Top  elevation,  unit  uei^t,  and  friction  angle 
or  cobasion. 


y Elevation  of  GUT 


Lagir  2: 

Top  elevation,  unit  wt,  and  friction  angle 
or  cobesion. 


Lager  9: 

Top  elevation,  isiit  uei^t,  and  friction  aigla 
or  caliosion. 


Spacing  of  Soldier  Piles 
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5.2.1  Wall  Data 


1.  Name  of  engineer,  for  maximum  of  40 
characters . 

2.  Project  title,  for  maximum  of  40  characters. 

3.  Date  of  report,  for  maximum  of  30  characters. 

4.  Elevation  of  the  top  of  the  excavation  (ft). 

5.  Elevation  of  the  bottom  of  tho  excavation 

(ft). 

6.  Number  of  anchors  used  in  the  cut  for  a 
maximum  of  ten  anchors. 

7.  Elevation  of  the  anchors  from  the  top  of  the 
excavation  to  the  bottom  (ft). 

8.  Center  to  center  spacing  of  the  soldier  piles 

(ft). 

5.2.2  Soil  Data 

1.  Number  of  soil  layers  for  a  maximiun  of  ten 
layers . 

2.  Soil  type  of  the  entire  excavation,  either  one 
for  sands  or  two  for  clays. 

3.  For  clays,  the  type  of  the  analysis  to  be 
performed  (either  total  or  effective  stress  analysis) 
is  entered.  If  a  total  stress  analysis  is  to  be 
accomplished,  the  saturated  unit  weight  of  the  soil 
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above  and  below  the  ground  water  table  is  entered.  For 
an  effective  stress  analysis,  the  saturated  unit  weight 
of  the  soil  is  entered  above  the  water  table  and  the 
buoyant  unit  weight  entered  below  the  water  table.  The 
elevation  of  the  ground  water  table  should  be  above  the 
bottom  of  the  excavation  for  the  effective  stress 
analysis . 

4.  Soil  properties  including  elevation  of  the  top 
of  the  layer  (ft),  saturated,  buoyant,  or  moist  unit 
weight  (kef),  and  friction  angle  (degrees)  for  sands  or 
undrained  shear  strength  (ksf)  for  clays. 

5.  Elevation  of  the  ground  water  table  (ft). 

6.  Slope  of  tl'e  ground  surface  behind  the 
excavation  (degrees). 

7.  Uniform  surcharge  load  (ksf). 

8.  Strip  surcharge  load  (ksf),  the  width  of  the 
strip  load  (ft),  and  the  distance  from  the  wall  face  to 
the  start  of  the  strip  load  (ft). 

5.2.3  Wall  Analysis  Data 

1.  Estimated  width  of  the  flange  of  the  soldier 
pile  (ft). 

2.  Factor  of  safety  against  passive  resistance. 

3.  Depth  of  over-excavation  below  an  anchor 
elevation  for  intermediate  stages  (ft). 
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5.2.4  Anchor  Analysis  Data 

1.  The  spacing  of  anchors  (ft). 

2.  The  angle  of  inclination  the  anchors  are  set 
from  horizontal  (degrees). 

3.  The  type  of  soil  the  anchors  are  set  in.  The 
options  include: 

Type  Soil  Description 

1  Fine  to  medium  sand 

2  Medium  to  coarse  sand 

3  Sandy  gravel 

4  Medium  clay 

5  Medium  stiff  clay 

6  Stiff  clay 

7  Stiff  to  very  stiff  clay 

8  Very  stiff  clay 

9  Very  stiff  to  hard  clay 


SPT  N  Value 
12  -  30 

20  -  45 

>  45 
4-8 

9-11 
12  -  15 
16  -  20 

21  -  30 

>  30 


5.3  Output  Data 

Figure  5.3  lists  a  typical  output  file.  The 
output  file  is  broken  down  into  four  sections:  wall 
properties;  soil  properties;  wall  analysis  results; 
and  anchor  and  wale  analysis  results.  The  wall  and 
soil  property  sections  list  the  input  data  for  the 
wall  and  soil  under  items  1  through  12. 
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****************************************************** 
*  * 

*  Design  of  Soldier  Pile  and  Lagging  * 

*  In  Accordance  with  NAVFAC  DM-7  * 

*  * 
****************************************************** 

I.  WALL  PROPERTIES 

1.  Engineer:  O' Amanda 

2.  Project:  International  Corporate  Park 

3.  Date:  10  November  1989 

4.  The  elevation  of  the  top  of  the  excavation  is 
102.00  feet. 

5.  The  elevation  of  the  bottom  of  the  excavation  is 
81.00  feet. 

6.  The  number  of  anchors  is  2. 

The  anchors  are  located  as  follows: 

Anchor  Elevation  (feet) 

1  96.00 

2  89.00 

7.  The  spacing  of  the  soldier  piles  is 

II.  SOIL  PROPERTIES 

8.  The  elevation  of  the  water  table  is 

9.  The  soil  properties  are  as  follows: 

Soil  Type  Elev  Unit  Wt 

sand  102.00  0.1150 

10.  The  slope  of  the  ground  behind  the 
degrees . 

11.  The  surcharge  load  is  0.250  ksf. 

12.  The  strip  load  is  0.50  ksf,  10.00  feet  wide,  and 
located  45.0  feet  from  the  wall. 

III.  HALL  ANALYSIS  RESULTS 

13.  Estimated  width  of  the  soldier  pile  is  0.5  feet. 

14.  Factor  of  safety  for  passive  resistance  is  1.0. 

15.  The  wall  was  excavated  1.0  feet  below  the  proposed 
anchor  location. 


5.00  feet. 

50.00  feet. 

Friction  Angle 
or  Cohesion 
38.00 

wall  is  31.5 


Figure  5.3 
Sample  Output  File 
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16. 

STAGE  ZERO  MAXIMUM  SECTION 

EMBEDMENT 

REACTION(S) 

SHEAR  MOMENT 

MODULUS 

DEPTH 

(ft)  (k-ft) 

(in"3) 

(ft) 

(kips) 

1 

12.1  55.23 

23.01 

10.1 

— 

2 

21.9  20.45 

8.52 

5.5 

R1  =  19.10 

3 

17.0  27.86 

11.61 

4.6 

R1  =  42.04 
R2  =  17.17 

NOTE: 

Stage  1  moment 

based  on  Kiewit  criteria  is 

42.1  kip-ft. 

Stage  2  moment 

based  on  Kiewit  criteria  is 

19.0  kip-ft  and  reaction 

force  is 

16.7  kips. 

NOTE: 

Minimum  depth  i 

of  embedment  based  on  maximum 

moment  is  3.8 

feet . 

NOTE: 

NYCTA  recommends  minimum 

penetration  depth  of 

six  feet. 

IV. 

A  N 

C  H  0  R  AND 

WALE 

RES 

U  L  T  S 

17. 

Spacing  of  the  anchors  is  10.0 

feet. 

18. 

The 

anchors  are  set 

at  an  angle  of  5.0 

degrees . 

19. 

The 

anchors  are  set 

in  medium 

to  coarse 

sand. 

20. 

ANCHOR 

SECTION  MODULUS 

ANCHOR 

ANCHOR 

UNBONDED 

ROW 

OF  WALE 

CAPACITY 

LENGTH 

LENGTH 

Un^S) 

(kips) 

(ft) 

(ft) 

1 

58.4 

84 

7.4 

7.0 

2 

23.8 

34 

4.0 

3.8 

NOTE:  Tieback  capacity  is  based  on  pressure 

injected  anchors  using  and  effective  grout 
pressure  in  excess  of  150  psi  with  a  diameter 
between  4  to  6  inches  and  depth  of  overburden 
greater  than  13  feet. 

NOTE:  FHWA/RD-82/047  recommends  a  minimiun  unbonded 

length  of  15  feet. 

END  OF  ANALYSIS 


Figure  5.3  (Continued) 
Sample  Output  File 
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In  the  wall  analysis  results  section,  items  13 
through  15  are  the  input  values  for  the  width  of 
the  pile,  factor  of  safety  for  passive  resistance, 
and  the  depth  of  over-excavation  respectively.  The 
actual  results  from  the  analysis  are  listed  under 
item  16  and  include:  stage;  point  of  zero  shear; 
maximum  moment;  embedment  depth;  and  reaction  forces. 
The  location  of  the  point  of  zero  shear  is  from  the  top 
of  the  pile.  The  depth  of  embedment  is  calculated 
from  the  maximum  moment  for  that  particular  stage  and 
is  measured  from  the  bottom  of  the  cut.  Four  notes  may 
be  displayed  within  this  section.  The  results  using 
the  Kiewit  criteria  for  the  first  two  stages  are  listed 
in  the  first  note.  The  next  note  lists  the  minimum 
depth  of  embedment  based  on  the  maximum  moment  from  all 
stages  of  excavation.  If  the  penetration  depth  for  the 
last  stage  or  the  minimum  embedment  depth  is  less  than 
six  feet,  a  note  is  displayed  indicating  NYCTA  (1974) 
recommends  a  minimum  penetration  depth  of  six  feet. 

The  last  note  is  displayed  for  clay  layering  stating 
the  type  of  analysis,  either  total  or  effective  stress, 
used  in  the  calculations. 

The  anchor  and  wale  analysis  results  section 
lists  the  anchor  spacing,  inclination  angle  of  the 
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anchor,  and  soil  type  under  items  17  through  19.  The 
results  of  the  analysis  are  listed  under  item  20,  It 
includes  anchor  row,  section  modulus  of  the  wale, 
required  anchor  capacity,  (bonded)  anchor  length,  and 
unbonded  anchor  length.  A  note  is  displayed  stating 
how  the  anchor  capacity  was  derived.  Another  note  is 
displayed  if  the  unbonded  length  of  the  anchor  is  less 
than  fifteen  feet.  FHWA/RD-82/047  recommends  a  minimum 
unbonded  length  of  fifteen  feet. 

5.4  Error  Messages 

The  follow  error  messages  are  possible  within 
the  program: 

"You  must  input  or  read  data  before  editing  them." 
Data  must  be  entered  or  read  before  selecting  the 
edit  function. 

"You  must  input  or  read  data  before  you  save 
them."  Data  must  be  entered  or  read  before  selecting 
the  save  data  function. 

"You  must  input  or  read  data  before  analysis." 

Data  must  be  entered  or  read  before  selecting  the 
wall  analysis  function. 

"You  must  accomplish  wall  analysis  before  you  can 
save  it."  The  wall  analysis  function  must  be 
accomplished  before  selecting  the  save  function. 
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"You  must  accomplish  wall  analysis  before  this 
analysis.”  The  wall  analysis  function  must  be 
accomplished  before  selecting  the  anchor/wale  analysis 
function . 

"The  bottom  of  the  excavation  must  be  below  the 
top."  The  elevation  entered  for  the  bottom  of  the 
excavation  must  be  below  the  top  of  the  excavation. 

"The  elevation  of  this  anchor  must  be  below  the 
prior  anchor  or  the  top  of  the  excavation  and  above  the 
bottom  of  the  excavation."  The  elevation  entered 
for  the  anchor  location  must  be  below  the  previous 
anchor  location  or  the  top  of  the  excavation  and 
above  the  elevation  of  the  bottom  of  the  excavation. 

"The  location  of  the  water  table  can  not  be  above 
the  top  of  the  excavation."  The  elevation  of  the 
ground  water  table  must  be  entered  below  the  elevation 
of  the  top  of  the  excavation. 

"The  soil  type  must  be  either  1  (sands)  or  2 
(clays)."  The  soil  type  for  the  cut  roust  be  entered 
either  1  or  2  for  sands  and  clays  respectively. 

"The  first  layer  must  extend  to  the  top  of  the 
excavation."  For  the  first  soil  layer,  the  elevation 
of  the  top  of  the  layer  must  extend  to  the  top  of  the 
excavation. 


61 


"The  elevation  of  the  top  of  the  soil  layer  must 
be  below  the  last  layer."  The  elevation  entered  for 
the  top  of  a  soil  layer  must  be  below  the  elevation  of 
the  previous  layer. 

"The  location  of  the  ground  water  table  must  be 
above  the  bottom  of  the  excavation  for  an  effective 
stress  analysis."  When  using  an  effective  analysis 
approach  to  calculate  stresses  for  clay  layering,  the 
ground  water  table  must  be  located  above  the  bottom  of 
the  excavation.  The  buoyant  unit  weight  of  the  soil 
should  be  entered  below  the  water  table. 

"Trouble  opening  'filename'  --  Read  mode.  Reenter 
the  filename  or  type  abort  to  return  to  the  main  menu." 
The  filename  entered  for  read  data  does  not  exist  in 
the  working  directory.  Either  the  filename  must  be 
reentered  or  abort  entered  to  return  to  the  main  menu. 

"Width  must  be  positive."  The  estimated  width 
of  the  flange  of  the  soldier  pile  must  be  entered  as 
a  positive  number. 

"Factor  of  safety  must  be  positive."  The  factor 
of  safety  for  passive  resistance  must  be  entered  as  a 
positive  number. 

"Soil  will  not  support  the  wall  below  a  depth  of 
XX. X  feet."  For  clay  layering,  the  soil  will  not 
support  the  wall  below  the  depth  listed. 
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CHAPTER  SIX 


CONCLUSIONS 

6.1  Review  of  Objectives 

The  objective  of  the  computer  prograrti  was  to 
provide  a  rapid  and  effective  method  to  analyze  braced 
excavations.  By  varying  the  number  and  location  of 
tieback  anchors,  the  design  of  a  soldier  pile  and 
lagging  wall  may  be  optimized.  Once  an  initial  design 
is  computed,  the  engineer  may  then  accomplish  final 
design  calculations  based  on  the  results  from  the 
computer  program.  This  will  significantly  reduce  the 
time  to  accomplish  an  actual  design. 

6.2  Summary  of  Design  Procedures 
Recommended  design  procedures  are  first  to 

determine  the  soil  conditions,  wall  requirements,  and 
any  surcharge  loads.  Next,  select  an  initial  number 
of  anchors  and  their  respective  locations.  Then  run 
the  program  with  the  selected  data,  revising  the  number 
and  locations  of  the  anchors  until  the  reaction 
forces  and  required  section  modulus  are  within 
acceptable  limits.  A  soldier  pile  section  may  be 
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selected  from  the  Manual  of  Steel  Construction  (1980) 


based  on  the  required  section  modulus.  Lagging  size 
may  be  chosen  from  the  design  table  included  in  chapter 
three  (Table  3.1)  from  FHWA/RD-75/124  (1976).  The 
anchor  analysis  function  of  the  program  may  be  used  to 
estimate  the  wales'  section  modulus  and  the  unbonded 
and  bonded  length  of  the  tieback  anchors.  Spacing  of 
the  anchors  may  be  varied  until  acceptable  results  are 
produced.  Also  by  adjusting  the  input  parameters,  the 
effects  of  a  ground  water  table;  different  soil 
conditions;  or  increased  surcharge  loading  may  be 
analyzed. 

The  program  does  not  check  the  overall  stability 
of  a  wall  and  the  surrounding  soil  mass.  The  soil 
pressure  acting  against  a  wall  may  be  greater  in  the 
case  of  slope  stability  than  for  braced  cuts  and  thus 
govern  wall  design.  Also,  the  factors  of  safety 
against  failure  of  the  steel  tendons  of  the  anchors 
and  failure  in  the  anchor  zone  should  be  verified 
separately.  The  computer  program  PCSTABL  can  be  used 
to  accomplished  this  analysis. 
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6.3  Conclusions 


The  program  SOLDIER.EXE  can  provide  the  engineer 
with  a  quick  and  effective  method  of  designing  a 
soldier  pile  and  lagging  wall.  With  the  program,  the 
engineer  can  also  investigate  the  effects  of  differing 
soil  conditions,  water  table  location,  surcharge 
loading,  and  wall  dimensions  and  properties. 

The  engineer  must  understand  the  design  concepts 
and  assumptions  made  within  the  program  to  ensure  they 
are  applicable  to  a  particular  project.  This 
computer  program  is  not  intended  to  be  a  replacement 
for  a  complete  design  by  a  competent  engineer.  The 
stresses  produced  by  braced  cuts  can  only  be  roughly 
estimated  and  a  monitoring  system  should  be  employed 
for  critical  cuts  to  ensure  the  acceptable  performance 
of  the  wall.  The  overall  satisfactory  performance  of 
the  wall  depends  greatly  on  determining  accurate  soil 
parameters,  the  external  loading  conditions,  and  the 
use  of  proper  construction  procedures. 
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APPENDIX  A 


V 

I 

■  VARIABLE  NOMENCLATURE 


I 
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The  nomenclature  of  the  variables  used  within 
the  program  are  listed  as  follow. 


Variable 

engineer 

project 

date 

telev 
be  lev 
numa 

anc[10] 

s 

gwt 

nums 

soil_type 


Definition  (units) 

Name  of  engineer,  for  maximum  of  40 
characters . 

Project  title,  for  maximum  of  40 
characters . 

Date  of  report,  for  maximum  of  30 
characters . 

Top  elevation  of  the  excavation  (ft). 

Bottom  elevation  of  the  excavation  (ft). 

number  of  anchors  used  in  the  cut 
excavation. 

Elevation  of  anchor  for  maximum  of  ten 
anchors  (ft). 

Spacing  of  the  soldier  piles  (ft). 

Elevation  of  the  water  table  (ft). 

Number  of  soil  layers. 

Type  of  soil.  Either  one  for  sands  or 
two  for  clays. 


soil[10]C3] 


b 

q 


Soil  properties  for  maximum  of  ten 
layers:  Elevation  of  top  of  the  layer 
(ft),  saturated  or  moist  unit  weight 
(kef),  and  friction  angle  (degrees)  or 
cohesion  value  (ksf). 

Slope  of  the  ground  behind  the 
excavation  (degrees). 

Surcharge  load  (ksf). 


bf 


Estimated  thickness  of  flange  of  soldier 
pile  (ft). 
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f  s 


w 


d 

ang 


typa 


Factor  of  safety  against  passive 
resistance. 

Depth  of  over-excavation  below  the 
anchor  elevation  for  intermediate  stages 
(ft). 

Spacing  of  anchors  (ft). 

Inclination  angle  the  anchors  are  set 
(degrees ) . 

Soil  type  for  anchor  analysis 
calculations . 


pi 

filename 

wt 

fa 

wtb 

fab 

Ka 

Kab 

Kp 


Constant  value  of  3.141592654. 

Name  of  file  to  save  or  read  data  or  to 
save  analysis,  for  maximum  of  10 
characters . 

Average  saturated  or  moist  unit  weight 
of  cut  soil  (kef). 

Average  Friction  angle  of  soil 
(degrees) . 

Saturated  or  moist  unit  weight  of  base 
soil  (ksf). 

Friction  angle  of  base  soil  (degrees). 

Coefficient  of  active  earth  pressure  for 
the  cut  soil . 

Coefficient  of  active  earth  pressure  for 
the  base  soil. 

Coefficient  of  passive  earth  pressure 
for  the  base  soil. 


sigh 


Horizontal  stress  or  force  due  to  soil 
(ksf  or  kips). 


sigs 


Horizontal  stress  or  force  due  to 
surcharge  (ksf  or  kips). 
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pp 

u 

ca 

cb 

Ns 

zt 

z[ll] 

R[10][10] 

M[ll] 

S[ll] 

DCll] 

Mmax 

Dmin 

Mk[2] 

Rk 

P[10] 


Net  passive  resistance  pressure  or  force 
(ksf  or  kips) . 

Hydrostatic  force  or  stress  (kips  or 
ksf )  . 

Undrained  shear  strength  of  cut  clay 
soi 1  (ksf ) . 

Average  undrained  shear  strength  of  base 
clay  soil  (ksf) . 

Stability  number  of  the  cut  for  clays. 

Length  of  tension  zone  for  clays  (ft). 

Depth  of  zero  shear  from  top  of 
excavation  ( f t ) . 

Reaction  forces  for  each  stage  of 
construction  (kips). 

Maximum  moment  for  a  stage  of  excavation 
(kip-f t) . 

Required  section  modulus  for  a  stage  of 
excavation  (in^). 

Embedment  depth  for  a  stage  of 
excavation  (ft). 

Maximum  moment  from  all  stages  of 
excavation  (kip-ft). 

Minimum  embedment  depth  calculated  using 
Mmax  (ft). 

Maximum  moment  from  Kiewit  Analysis  for 
stage  one  and  two  of  sand  analysis  (kip- 
ft). 

Reaction  force  from  Kiewit  Analysis  for 
stage  two  of  sand  analysis  (kips). 

Anchor  force  for  maximum  of  ten 
reactions  (kips). 
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Section  Modulus  of  wale  (in^) 
Bonded  length  of  anchor  (ft). 


sw[ 10 ] 

LCIO] 

ul[10]  Unbonded  length  of  anchor  (ft). 

bp  Used  as  a  flag. 

c  Dummy  character. 

cc[20]  Dummy  characters,  for  maximum  of  twenty. 

H,  h,  hh,  hhh  Various  height  of  the  cut  variables 

(ft). 

a,  V,  y  Internal  variables  used  in  various 

calculations. 

i,  j,  k,  1  Global  counters. 

ij,  jk  Local  counters. 

str_anal  Type  of  stress  analysis  to  be  performed 

for  clay  layering.  Either  1  for  total 
or  2  for  effective  stress  analysis. 
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APPENDIX  B 


I 

V 

I 

I  COMPUTER  PROGRAM  FILE 
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II  ************************************************************* 
//  *  SOLDIER.EXE,  Version  1.01,  dtd  15  NOV  91 
//  *  Program  written  by  Kevin  D'Amanda. 

//  *  Address  until  Jan  95: 

//  *  COMCBLANT,  Naval  Amphibious  Base  Little  Creek, 

//  *  NorfDlk,  VA  23521-5070 

II  ************************************************************* 

♦include  <conio.h> 

♦include  <stdio.h> 

♦include  <ctype.h> 

♦include  <stdlib.h> 

♦include  <complex.h> 

♦include  <string.h> 

II  ************************************************************** 

//  *  DECLARE  FUNCTION 

II  ************************************************************** 

void  input( void) ; 
void  read_data( void) ; 
void  save_data( void) ; 
void  view_data( void) ; 
void  analysis( void) ; 
void  anchor ( void ) ; 
void  ka_kp(void); 
void  clay_analysis( void) ; 
void  wt_c_cb( void) ; 
void  sand_analysis(void) ; 
void  save(void); 
void  min_D( void) ; 
void  strip( void) ; 

II  ************************************************************** 

II*  DECLARE  VARIABLES 

! !  ************************************************************** 

float  belev  =  0,  telev  =  0,  s  =  0,  gwt  =  0,  q  =  0,  b  =  0, 

anc[10],  soil[10][3],  hh  =  0,  H,  sw[10],  d  =  0,  ang  =  0,  L[10], 

ul[10],  bf  =  0,  fs  =  0,  w  =  0,  qs[3]; 

double  sigh,  sigs,  wt,  fa,  v,  y,  Ka,  Kp,  Kab,  wtb,  fab,  u,  P[10], 

Mc[2],  Rc,  qe,  Mmax,  Dmin,  zCll],  D[ll],  M[ll],  S[ll], 

R[10][10],  zt,  pp,  cb,  ca,  Mk[2],  Rk; 

int  type  =  0,  numa  =  0,  nums  =  0,  i=:0,  k  =  0,  j  =  0,  1=0, 
bp  =  0,  soil_type,  str_anal; 
const  float  pi  =  3.141502654; 

char  c  =  'x',  cc[20],  f ilename[10] ,  engineer[40] ,  project[40], 
date[30] ; 
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II  ************************************************************** 
//  *  MAIN  FUNCTION 

II  ************************************************************** 
main(void)  { 

/ /  ************************************************************** 
//  *  INITIALIZE  VARIABLES 

II  ************************************************************** 

for  (i  =0;  i  <  10;  i++) 

{  for  (k  =  0;  k  <  3;  k++)  soil[i][k]  =  0; 

for  (j  =0;  j  <  10;  j++)  R[i][j++]  =  0; 

anc[i]  =  2[i]  =  D[i]  =  M[i]  =  S[i]  =  sw[i]  =  P[i]  =  ul[i]  = 

L[i]  =  0;  } 


II  ************************************************************** 

//  *  MAIN  MENU  ROUTINE 

II  ************************************************************** 

M: 

clrscr( ) ; 
cout  <<  "\n'' 


<< 

<< 

<< 

<< 

<< 


«  "\t 
"\t 
•’\t 
"\t 
”\t 
••\t 

cout  << 
cout  << 

<< 

<< 

<< 

<< 

<< 

<< 

<< 

<< 

while  ((i 
cout  <<  " 
«  "\n\a 
cout  <<  •' 
switch  (i 
case 
case 
case 
else  { 
cout  << 
edit  them 


Design  of  Soldier  Pile  and  Lagging 
In  Accordance  with  NAVPAC  DM-7 


\n- 

\n" 

\n’’ 

\n” 

\n'’ 

Xn”; 


1: 

2: 

3: 

cl 


\n\n\t\t\t  MAIN  MEN  U\n\n"; 

\t\t  1.  Enter  Soil  Properties  and  Hall  Data\n" 

\t\t  2.  Read  Data  From  an  Existing  FileXn” 

\t\t  3,  Edit  Input  Data\n” 

\t\t  4.  Save  Input  Data\n” 

\t\t  5.  Execute  Hall  Analysis\n" 

\t\t  6.  Execute  Anchor\\Hale  AnalysisXn** 

\t\t  7.  Save  Analysis  in  an  Output  File\n” 

\t\t  8.  Exit  Program\n\n” 

\t\t\t  Your  Choice?  --  ”; 

=  atoi(gets(cc) ) )  <=0  I!  i  >=9)  { 

\n\t\t"  <<  cc  <<  ”  is  an  incorrect  response,  try  again.' 

\t\t\t  Your  Choice?  } 

)  { 

inputO;  bp  s  1;  break; 
read_data( ) ;  bp  =  1;  break; 
if  (bp)  view_data(); 
rscr( )  ; 

\n\n\n\tERROR  -  You  must  input  or  read  data  before  you 
!"  <<  "\n\t  Press  the  enter  key  to  return  to  the 
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main  menu.  \a''; 
gets(cc);  } 
break; 

case  4:  if  (bp)  save_data( ) ; 
else  {  clrscrO; 

cout  <<  "\n\n\n\tERROR  -  You  must  input  or  read  data  before  you 
save  them!"  <<  "\n\t  Press  the  enter  key  to  return  to 

the  main  menu.\a"; 
gets(cc);  } 
break; 

case  5:  if  (bp)  {  analysis();  bp  =  2;} 
else  {  cirscr(); 

cout  <<  "\n\n\n\tERROR  -  You  must  input  or  read  data  before 
analysis!"  <<  "\n\t  Press  the  enter  key  to  return  to  the 

main  menu.\a"; 
gets(cc);  } 
break; 

case  6:  if  ((bp  >  1)  &&  (numa  >  0))  anchorO; 
if  (numa  ==  0)  {  clrscrO; 

cout  <<  "\n\n\n\t  There  are  no  anchors  in  the  wall  data, 
therefore"  <<  "\n\t  anchor  analysis  is  not  required."  << 
"\n\n\t  Press  the  enter  key  to  return  to  the  main  menu.\a"; 
gets(cc);  } 

if  (bp  <=  1)  {  clrscrO; 

cout  <<  "\n\n\n\tERROR  -  You  must  accomplish  wall  analysis  before 
this  analysis!"  <<  "\n\t  Press  the  enter  key  to  return 

to  the  main  menu.\a"; 
gets(cc);  } 
break; 

case  7:  if(bp>l)  save(); 

else  {  clrscrO; 

cout  <<  "\n\n\n  ERROR  -  You  must  accomplish  wall  analysis  before 
you  can  save  the  data!"  <<  "\n  Press  the  enter  to 

return  to  the  main  menu.\a"; 
gets(cc);  } 
break; 

II  ************************************************************** 

//  *  EXIT  ROUTINE 

II  ************************************************************** 

case  8:  cout  <<  "\n\t  Are  you  sure  you  want  to  quit  the  program? 

(y/N)  -  "; 
do  {  gets(cc); 
c  =  toupper(cc[0] ) ; 

if  ((c  ==  ’Y’)  I!  (c  ==  ’N’))  break; 

cout  <<  "\n\tThat's  not  Yes  or  No,  please  enter  a  T  or  N.  --  \a"; 
}  while  ((c  !=  ’Y')  !1  (c  !=  ’N’));  ) 

if  (c  ==  'Y')  { 
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c  1  irscir ( )  j 

cout  <<  ’’\n\n\n\t\tp  ROGRAM  TERMINATE  D\n"; 
exit(O);  } 
goto  M;  } 

j j  ************************************************************** 
//  *  INPUT  FUNCTION 

//  *  Enter  program  variables  for  calculations. 

II  ************************************************************** 


void  input(void)  { 
clrscr( ) ; 

cout  <<  ''\n\t\t\tWal  1  Properties\n\n”; 
cout  <<  "\n\tEnter  the  Engineer's  name.  -- 
gets (engineer) ; 

cout  <<  "\n\tEnter  the  project  name.  -- 
gets(pro ject ) ; 

cout  <<  "\n\tEnter  the  date.  -- 
gets (date) ; 

cout  <<  "\n\tEnter  the  elevation  of  the  top  of  the  excavation  in 
feet.  — 
cin  >>  telev; 

cout  <<  "\n\tEnter  the  final  elevation  of  the  bottom  of  the 
excavation.  -- 
cin  >>  belev; 
if  (belev  >=  telev) 

{  cout  <<  "\nERROR  -  The  bottom  of  the  excavation  must  be  below 
the  top!"  <<  "\n  Reenter  the  final  elevation  of  the 

excavation.  --  \a"; 
cin  >>  belev;  ) 

cout  <<  "\n\tEnter  the  number  of  anchors  that  are  to  be  used  to 
support  the"  <<  "\n\t  excavation  for  a  maximum  of  ten  anchors. 

/ 

cin  >>  numa; 
if  ( numa )  { 

cout  <<  "\n\tEnter  from  the  top  to  bottom  the  elevation  in  feet 
of  the  anchor(s) . \n"; 
hh  =  telev; 
j  =  0; 

for  (1  =  0;  1  <  niima;  ++1)  { 

cin  >>  anc[j]; 

while  (anc[j]  >=  hh  !l  anc[j]  <=  belev) 

{  cout  <<  "\n\tERROR  -  The  elevation  of  this  anchor  must  be  below 
the  prior  anchor  or"  <<  "\n\t  the  top  of  the  excavation 

and  above  the  bottom  of  the  excavation."  <<  "\n\t  Reenter 

the  elevation  of  this  anchor.  -*■  \a"; 
cin  >>  anc[j];  } 
hh  =  ancCj];  ++j;  )  } 

cout  <<  "\n\tEnter  the  spacing  of  the  soldier  piles.  —  "; 
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cin  >>  s; 

clrscrO;  „ 

cout  <<  "\n\t\t\tSoil  Properties\n\n  ; 

cout  <<  "\n\tEnter  the  number  of  soil  layers  for  a  maximum  of  ten 
layers.  -- 
cin  >>  nums ; 

cout  <<  "\n\tEnter  the  soil  type,  either  1  for  sands  or  2  for 
clays.  --  " ; 
cin  >>  soil_type; 

while  ((soil_type  <=  0)  ',1  (soil_type  >=  3))  {. 

cout  <<  "\n\n\tERROR  -  The  soil  type  must  be  either  1  (sands)  or 
2  (clays). \a"  <<  "\n\t  Please  reenter  soil  type.  -- 

cin  >>  soil_type;  } 
clrscr( ) ; 

if  (soil_type  ==  1)  { 

cout  <<  "\n\n\tEnter  the  soil  layering  properties  as  follows  from 
top  down:\n"  <<  "\n\tEl evation  of  the  top  of  the  soil  layer  in 
feet  from  top  down."  <<  "\n\tMoist  or  saturated  unit  weight  of 
the  soil  (kips/f t"3) . "  <<  "\n\tFriction  angle  (degrees)."  << 
"\n\t(The  entry  should  read  like:  100  .115  35)"  << 

"\n\n\tNOTE:  The  top  of  the  excavation  is  at  elevation  "  << 

telev  <<  "  feet.\n";  } 
else  { 

cout  <<  "\n\n\tDo  you  wish  to  perform  a  total  or  effective  stress 
analysis?"; 

cout  <<  "\n\n\tlf  you  would  like  to  accomplish  a  TOTAL  STRESS 
ANALYSIS  enter"  <<  "\n\t  the  saturated  unit  weight  of  the  soil 
above  and  below  the"  <<  "\n\t  ground  water  table.'*; 
cout  <<  "\n\n\tlf  you  would  like  to  accomplish  an  EFFECTIVE 
STRESS  ANALYSIS"  <<  "\n\t  enter  the  satuarted  unit  weight  of  the 
soil  above  the  water"  <<  "\n\t  table  and  the  buoyant  unit  weight 
of  the  soil  below  the  water"  <<  "\n\t  table.  The  water  table 
elevation  should  be  located  above  the"  <<  "\n\t  bottom  of  the 
cut . " ; 

cout  <<  "\n\n\tEnter  1  for  a  total  stress  analysis  and  2  for  an 
effective"  <<  "\n\t  stress  analysis.  --  "; 
cin  >>  str_anal ; 

while  ((str_anai  <=  0)  I  I  (str_anal  >=  3))  { 
cout  <<  "\n\tERROR  -  Please  enter  either  a  1  (total)  or  2 
(effective).  --\a"; 
cin  >>  str_anal ;  } 
clrscr(); 

cout  <<  "\n\tEnter  the  soil  layering  properties  as  follows  from 
top  down:"  <<  "\n\tElevation  of  the  top  of  the  soil  layer  in 
feet  from  top  down."  <<  "\n\tSaturated  or  buoyant  unit  weight  of 
the  soil  (kips/f ^3) . "  <<  "\n\tUndrained  shear  strength  (ksf)." 
<<  "\n\t(The  entry  should  read  like:  100  .115  1.5)"  << 

"\n\n\tNOTE:  The  top  of  the  excavation  is  at  elevation  "  << 

telev  <<  "  feet.\n";  } 
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hh  =  lElO;  j  =  0; 

for  (i  =  0;  i  <  nums;  ++i)  { 

cin  >>  soil[j][0]  >>  soilCj][l]  >>  soil[j][2]; 

while  ((soil[j][0]  >  hh)  ||  (soil[0][0]  !=  telev)) 

{  if  (soil[j][0]  >  hh) 

cout  <<  "\nERROR  -  "  <<  "\n  The  elevation  of  the  top  of  the 

soil  layer  must  be  below  the  last  layer."  <<  "\n  Reenter 

all  the  soil  data  for  this  layer.  --  \a"; 
if  (soil[0][0]  !=  telev) 

cout  <<  "\nERROR  -  The  first  layer  must  extend  to  the  top  of  the 
excavation"  <<  "\n  Reenter  all  the  soil  data  for  this 

layer.  --  \a"; 

cin  >>  soil[j][0]  >>  soil[j][l]  >>  soil[j][2];  } 
hh  =  soil [ j] [0] ;  ++ j;  } 

cl rscr ( ) ; 

cout  <<  "\n\tEnter  the  elevation  of  the  water  table  in  feet.  -- 
• 
t 

cin  >>  gwt ; 

while  (gwt  >  telev)  { 

cout  <<  "\n\nERROR  -  "  <<  "\n  The  location  of  the  water  table  can 
not  be  above  the  top  of  the  excavation."  <<  "\n  Reenter  the 
location  of  the  water  table.  --  \a"; 
cin  >>  gwt;  } 

while  ((str_anal  ==  2)  S&  (gwt  <  belev))  { 

cout  <<  "\n  ERROR  -  The  location  of  the  ground  water  table  must 
be  above  the  bottom"  <<  "\n  of  the  excavation  for  an 

effective  stress  analysis."  <<  "\n\n  Reenter  the  location 

of  the  water  table.  --  \a"; 
cin  >>  gwt;  } 

cout  <<  "\n\tEnter  the  slope  of  the  ground  behind  the  wall  in 
degrees.  --  "; 
cin  >>  b; 

cout  <<  "\n\tEnter  the  surcharge  load  (ksf)."  <<  "\n\tPlease 
enter  0  if  none.  --  "; 
cin  >>  q; 

cout  <<  "\n\tEnter  the  data  for  any  strip  load:"  <<  "\n\t 
Surcharge  load  (ksf),  width  of  strip  load  (ft),"  <<  "\n\t  and 

the  distance  the  strip  load  is  from  the  wall  (ft).";  cout  << 
"\n\tPlease  enter  O's  if  none.  --  "; 
cin  >>  qs[03  >>  qs[l]  >>  qs[2]; 
clrscr();  } 

11  ************************************************************** 

//  *  READ  DATA  FUNCTION 

//  *  Read  data  from  a  existing  DOS  file  to  enter  variables. 

II  ************************************************************** 
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void  read_data( void)  { 
char  *cx  =  ’’ABORT”; 
cl rscr( ) ; 

cout  <<  ’’\n\n\n\tEnter  filename.  -- 
gets( filename) ; 

FILE  *ffp; 

while  ((ffp=fopen(filename,’’r’’))  =  =  NULL)  { 
printf ( ”\nERROR  -  Trouble  opening  %s  --  read  mode.\a”, 
f i 1 ename) ; 

cout  <<  ”\n\nReenter  the  filename  or  type  ABORT  to  return  to  the 
main  menu.  --  ’’; 
gets (filename) ; 
j  =  strlen( filename) ; 

for  (i  =  0;  i  <  j;  i++)  filename[i]  =  toupper ( f i 1 ename[ i ] ) ; 

if  (strcmp( f i lename ,  cx)  ==  0)  break;  } 

if  {strcmp( filename,  cx)  !=  0)  { 

fgets(engineer ,  60,  ffp); 

f gets(pro ject ,  60,  ffp); 

fgets(date,  30,  ffp); 

fscanf(ffp,  ”\n  %f  \n  %f  \n  %f  \n  %d”,  &telev,  &belev,  &s, 

&numa) ; 

for  (i  =  0;  i  <  numa;  ++i) 

{  fscanf(ffp,  ”\n  %f'',  Sanc[i]);  } 

fscanf(ffp,  ”\n  %f  \n  %d  \n  %d  \n  %d”,  Sigwt,  Sinums,  &soil_type, 
Sstr_anal ) ; 

for  (i  =  0;  i  <  nums;  ++i) 

{  fscanf(ffp,  ’’\n  %f  %f  %f’’,  &soilCi][0],  Ssoil[i][l], 
Ssoil[i][2]);} 

fscanf(ffp,  ”\n  %f  \n  %f  \n  %f  %f  %f”,  &b,  &q,  &qs[0],  SqsCl], 

&qs [ 2  ] ) ; 
f cl ose( f f p) ; 

cout<<  ”\n\tPlease  reenter:  Engineer’s  name.  --  ”; 
gets( engineer ) ; 

cout  <<  ”\t  Project  title.  -- 

gets(pro ject ) ; 

cout  <<  ”\t  Date.  --  ”; 

gets(date) ; 

cout  <<  ”\n\tData  read,  press  enter  key  to  continue.”; 
gets(cc);  }  } 

j  j  ************************************************************** 

II*  VIEW  AND  EDIT  ENTERED  DATA  FUNCTION 

//  *  View  and  edit  entered  program  variables. 

II  ************************************************************** 

void  view_data{ void)  { 

WALL:  clrscr(); 

cout  <<  ”\n\t\tW  ALL  PROPERTIE  S\n"; 
printf  (”\n\tl.  Engineer:  %s”,  engineer); 
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printf  (’'\n\t2.  Project:  %s",  project); 
printf  (”\n\t3.  Date:  %s",date); 

cout  <<  ’'\n\t4.  The  elevation  of  the  top  of  the  excavation  is  " 
<<  telev  <<  "  feet."  <<  "\n\t5.  The  elevation  of  the 
bottom  of  the  excavation  is  "  <<  belev  <<  "  feet."  <<  "\n\t6. 

The  number  of  anchors  is  "  <<  numa 
i f  ( numa )  { 

cout  <<  "\n\n\t  The  anchors  are  located  as  follows:\n"  << 
"\t\tAnchor"  <<  "\tElevation  (feet)\n"; 
j  =  0; 

for  (i  =  0;  i  <  numa;  ++i) 

{  printf("\t\t  %2d\t  %5.2f\n",  ++j,  anc[i]);}} 

cout  <<  "\n\t7.  The  spacing  of  the  soldier  piles  is  "  <<  s  <<  " 
feet . " ; 

cout  <<  "\n\n\tDo  you  want  to  change  any  values?  (Y/N)  --  "; 
do  {  gets(cc); 
c  =  toupper(cc[0 ] ) ; 

if  ((c  ==  'Y')  1!  (c  ==  'N'))  break; 
else  { 

cout  <<  "\n\t"  <<  cc  <<  "  is  an  incorrect  response,  try  again  -- 
\a";  }  }  while  (c  !='N' ) ; 

if  (c  ==  'N')  {  SOIL:  clrscrO; 
cout  <<  "\n\t\tS  OIL  PROPERTIE  S"; 

cout  <<  "\n\n\t8.  The  elevation  of  the  water  table  is  "  <<  gwt 
<<  "  feet."  <<  "\n\t9.  The  soil  properties  are  as  follow:\n" 

<<  "\n\t  Soil  Type  Elev  Unit  Wt  Friction 

Angle"  <<  "\n\\t  or  Cohesion"; 

j  =  0; 

for  (i  =  0;  i  <  nums;  ++i)  { 
cout  <<  "\n\t  "; 

if  (soil_type  ==  1)  cout  <<  "sand"; 
else  cout  <<  "clay"; 

printf  ("  %7.2f  %1.4f  %5.2f", 

soil[j][0],  soil[j][l],  soil[j][2]); 
j++;  } 

cout  <<  "\n\n\tl0.  The  slope  of  the  ground  behind  the  wall  is  " 
<<  b  <<  "  degrees."; 

cout  <<  "\n\tll.  The  surcharge  load  is  "  <<  q  <<  "  ksf."; 
printf  ("\n\tl2.  The  strip  load  is  %7.2f  ksf,  %4.2f  feet  wide,", 
qs[0],  qs[l]); 

printf ("\n\t  and  located  %5.1f  feet  from  the  wall.", 

qs[2]); 

cout  <<  "\n\n\n\tDo  you  want  to  change  any  values?  (Y/N)  --  "; 
do  (  gets(cc); 
c  =  toupper(cc[0] ) ; 

if  ((c  ==  'N')  !1  (c  ==  'Y'))  break; 
else  { 

cout  <<  "\n\t"  <<  cc  <<  "  is  an  incorrect  response,  try  again  -- 
\a";  }  }  while  (c  !=’Y’);  ) 
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/ /  ************************************************************** 

II*  EDIT  DATA  ROUTINE 

//  *  Edit  program  variables. 

//  ************************************************************** 

if  (c  ==  ’Y’)  { 

cout  <<  ''\n\tEnter  the  number  of  what  you  want  to  change  -- 
while  ((i  =  atoi(gets(cc) ) )  <=  0  ! I  i  >=  13) 

{  cout  <<  "\n\t"  <<  cc  <<  '*  is  an  incorrect  response . \a" ; 
cout  <<  "\n\tYour  choice?  } 

cl rscr ( ) ; 
switch  (i)  { 

case  1:  cout  <<  "\n\tEnter  the  Engineer’s  name  -- 
gets (engineer) ; 
break; 

case  2:  cout  <<  "\n\tEnter  the  project  name.  -- 

gets(pro ject ) ; 

break; 

case  3:  cout  <<  "\n\tEnter  the  date.  -- 

gets(date) ; 

break; 

case  4:  cout  <<  "\n\tEnter  the  elevation  of  the  top  of  the 
excavation  in  feet.  --  \n"; 
cin  >>  telev; 
soil[0][0]  =  telev; 
break; 

case  5:  cout  <<  ''\n\tEnter  the  elevation  of  the  bottom  of  the 
excavation  in  feet.  -- 
cin  >>  belev; 
break; 
case  6: 

cout  <<  "\n\tEnter  the  number  of  anchors  that  are  to  be  used.  -- 

t» . 

/ 

cin  >>  numa; 
hh  =  0; 

if  (numa  !=  0) 

{  j  =  0; 

cout  <<  "\n\tEnter  from  the  top  to  bottom  the  elevation  in  feet 
of  the  anchor(s)  --\n”; 
for  (1  =  0;  1  <  numa;  ++1) 

{  cin  >>  anc[j]; 
hh  =  telev; 

while  (anc[j]  >=  hh  I  I  anc[j]  <=  belev)  { 

cout  <<  '’\n\tERROR-  The  elevation  of  this  anchor  must  be  below 
the  prior  anchor  or"  <<  '*\n\t  the  top  of  the  excavation 

and  above  the  bottom  of  the  excavation."  <<  "\n\n\tReenter  the 
elevation  of  this  anchor.  --  \a"; 
cin  >>  anc[j];  } 
hh  =  anc[j];  ++j;  )  } 
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break; 

C3SG  7 ! 

cout  <<  "\n\tEnter  the  spacing  of  the  soldier  piles.  -- 
cin  >>  s; 
cl rscr ( ) ; 
break ; 

case  8:  cout  <<  "\n\n\tEnter  the  elevation  to  the  water  table  in 
feet.  -- 
cin  >>  gwt ; 
if  (gwt  >  telev)  { 

cout  <<  "\nERROR  -  "  <<  "\n  The  location  of  the  water  table  can 
not  be  above  the  top  of  the  excavation."  <<  "\n  Reenter  the 
location  of  the  water  table  --  \a"; 
cin  >>  gwt;  } 
break; 

case  9:  cout  <<  "\n\tEnter  the  number  of  soil  layers.  --  "; 
cin  >>  nums; 

cout  <<  "\n\tEnter  the  soil  type,  either  1  for  sands  or  2  for 
clays.  --  "; 
cin  >>  soil_type; 

while  ((soil_type  <=  0)  il  (soil_type  >=  3))  { 

cout  <<  "\n\tERROR  -  The  soil  type  must  be  either  1  (sands)  or  2 
(clays)."  <<  "\n\t  Please  reenter  soil  type.  --  \a"; 

cin  >>  soil_type;  } 
if  (soil_type  ==  2)  { 

cout  <<  "\n\tDo  you  wish  to  perform  a  total  or  effective  stress 
analysis?"  <<  "\n\tEnter  1  for  a  total  stress  analysis  and 

2  for  an  effective"  <<  "\n\t  stress  analysis.  -- 

cin  >>  str_anal ; 

while  ((str_anal  <=  0)  ||  (str_anal  >=  3))  { 
cout  <<  "\n\tERR0R  -  Please  enter  either  a  1  (total)  or  2 
(effective).  --\a";  cin  >>  str_anal ;  }  } 
cout  <<  "\n\tEnter  the  soil  layer's  properties:"  << 

"\n\tEl evation  of  top  of  the  layer,  unit  weight,  and  friction 
angle"  <<  "\n\t  or  undrained  shear  strength. \n" ; 
hh  =  1E8;  j  =  0; 
for  (1  =  0;  1  <  nums;  ++1)  { 

cin  >>  soil[j][0]  >>  soil[j][l]  >>  soilLj][2]; 
while  ((soil[j][0]  >  hh)  li  (soil[0][0]  !=  telev)) 

{  if  (soil[j][0]  >  hh) 

cout  <<  "\nERROR  -  "  <<  "\n  The  elevation  of  the  top  of  the 

soil  layer  must  be  below  the  last  layer."  <<  "\n  Reenter 

all  the  soil  data  for  this  layer.  --  \a"; 
if  (soil[0][0]  !=  telev) 

cout  <<  "\nERROR  -  The  first  layer  must  extend  to  the  top  of  the 
excavation"  <<  "\n  Reenter  all  the  soil  data  for  this 

layer.  --  \a"; 

cin  >>  soil[j][0]  >>  soil[j][l]  >>  soil[j][2];  } 
hh  =  soil [ j] [0] ;  ++ j;  } 
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break ; 

case  10:  cout  <<  "\n\tEnter  the  slope  of  the  ground  behind  the 
wall  in  degrees.  -- 
cin  >>  b; 
break ; 

case  11:  cout  <<  "\n\tEnter  the  surcharge  load  (psf)."  << 
"\n\n\t\tPl ease  enter  0  if  none.  -- 
cin  >>  q; 
break ; 
case  12: 

cout  <<  "\n\tEnter  the  data  for  any  strip  load:"  <<  "\n\t 
Surcharge  load  (ksf),  length  of  strip  load  (ft),"  <<  "\n\t  and 
the  distance  the  strip  load  is  from  the  wall  (ft)."; 
cout  <<  "\n\tPlease  enter  0  if  none.  --  "; 
cin  >>  qs[0]  >>  qs[l]  >>  qs[2]; 
break;  } 
clrscr ( ) ; 

if  (i  <  8)  goto  WALL; 
else  goto  SOIL;  }  } 

II  ************************************************************** 
//  *  SAVE  DATA  FUNCTION 

//  *  Save  entered  data  into  a  DOS  file. 

II  ************************************************************** 

void  save  data(void)  { 

FILE  *fp; 
cl rscr ( ) ; 

cout  <<  "\n\tEnter  filename  to  save  the  data.  --  "; 
gets( filename) ; 

while  ( ( f p=f open( f i 1 ename, "r" ) )  !=  NULL)  { 

cout  <<  "\n\tThe  file  already  exits,  do  you  want  to  overwrite  it? 

(Y/N)  --  \a"; 
gets(cc) ; 

c  =  toupper ( cc[0] ) ; 
switch  (c)  { 
case  'Y':  break; 

case  'N':  cout  <<  "\n\tReenter  the  filename.  --  "; 
gets( f i lename) ; 
break; 
default  : 

cout  <<  "\n\t"  <<  cc  <<  "  is  an  incorrect  response,  try  again. 

--  \a"; 
gets(cc)  ; 

c  =  toupper(cc[0] ) ;  } 
if  (c  ==  'Y')  {  c  =  'x';  break;  }  } 

fp  =  f open( fi 1 ename ,  "w+"); 
fprintf(fp,  "%s",  engineer); 
fprintf(fp,  "\n  %s",  project); 
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fprintf(fp,  "\n  %s",  date); 
fprintf(fp,  "\n  %f",  telev); 
fprintf(fP/  "\n  %f"/  belev); 
fprintf(fp,  "\n  %f",  s); 
fprintf(fp,  "\n  %d",  numa); 

for  (j  =0;  j  <  numa;  ++j)  fprintf(fp,  "\n  %f",  anc[j]); 

fprintr(fp,  ’'\n  %f",  gwt); 

fprintf(fp,  "\n  %d",  nums); 

fprintf(fp,  "\n  %d",  soil_type); 

fprintf(fp,  "\n  %d",  str_anal); 

for  (i  =  0;  i  <  nums;  ++i) 

fp’:intf(fp,  "\n  %£  %f  %f’,  soil[i][0],  soil[i][l],  soil[i][2]); 
fprintf(fp,  "\n  %f",  b); 
fprintf(fp,  "\n  %f*',  q)  : 

fprintf(fp,  "\n  %f  %f  %£",  qs[0],  qs[l],  qs[2]); 
f cl ose( f p) ; 

cout  <<  "\n\tData  saved,  press  enter  key  to  return  the  main 
menu . " ; 
gets( cc) ; 
cl rscr ( ) ;  } 

II  ************************************************************** 

//  *  ANALYSIS  FUNCTION 

//  *  Determine  soil  type,  call  subfunction  to  accomplish 

//  *  calculations,  and  display  results  from  analysis. 

II  islfkliiiit1(is1c1t1(1t1tis*ifk*1(1t***it**ii1t1tH1t1ck1t1cit1t1t1(i(1t1c1cit1t1t1t1t1c1titt'k1tifkiskit1c1c1t 

void  analysis(void)  { 
cl rscr ( ) ; 

//  Enter  Width  of  Pile,  Factor  of  Safety,  &  Excav.  Depth 
cout  <<  "\n\n\tEnter  the  estimated  width  of  the  flange  of  the 
soldier  pile.”  <<  "\n\t  (Enter  0  for  default  setting  of  1 

foot . ) 
cin  >>  bf; 
if  (bf  <  0) 

{  cout  <<  "\n\tERR0R  -  Width  must  be  positive.  Reenter  width  -- 
\a"; 

cin  >>  bf;} 

if  (bf  ==  0)  bf  =  1; 

cout  <<  "\n\n\tEnter  the  factor  of  safety  for  the  passive 
pressure."  <<  "\n\t(Enter  0  for  DM-7  recommendation  of  1.5.) 

cin  >>  fs; 
if  (fs  <  0) 

{  cout  <<  "\nERROR  -  Factor  of  safety  must  be  positive.  Reenter 
F.S.  --  \a"; 
cin  >>  f s ;  } 
if  (fs  ==  0)  fs  =  1.5; 
if  ( numa )  { 
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cout  <<  "\n\n\tEnter  the  depth  in  feet  below  the  anchor  location 
that  is  to  "  <<  "\n\t  excavated  prior  to  installing  the 

anchor.  --  "  ; 
cin  >>  w;  } 
cl rscr ( ) ; 

cout  <<"\n\n\n\t\t\tC  A  L  C  U  L  A  T  I  N  G 
if  (soil_type  ==  1)  sand_anal ysis( ) ; 
if  (soil_type  ==  2)  clay_analysis(  K* 
if  (z[0]  >=  0)  {  i  =  1,  j  =  0; 
clrscr( ) ; 

cout  <<  "\n\n\tRESULTS : "  <<  "\n\n\tEstimated  width  of  the  soldier 
pile  is  "  <<  bf  <<  "  feet."; 

cout  <<  "\n\tFactor  of  Safety  for  passive  resistance  is  "  <<  fs 
<  <  "  "  • 

cout  <<  "\n\tThe  wall  was  excavated  "  <<  w  <<  "  feet  below  the 
proposed  anchor  location."; 

cout  <<  "\n\n\t  STAGE  ZERO  MAXIMUM  SECTION  EMBEDMENT 
REACTION(S)"  <<  "\n\t  SHEAR  MOMENT  MODULUS 

DEPTH"  <<  "\n\t  (ft)  (k-£t)  (in'3) 

(ft)  (kips)"  <<  "\n\t - - 

_ »•  . 

printf(  "\n\t  %d  %6.1f  %6.2f'  %6.2f  %6.1f 

- ",  i,  z[i-l],  M[i-1],  S[i-1],  D[i-1]); 

for  (i  =  2;  i  <=  numa  +  1;  ++i)  { 

printf(  "\n\t  %d  %6.1f  %6.2f  %6.2f  %6.1f  Rl  = 

%6.2f",  i,  zCi-1],  M[i-1],  SCi-1],  D[i-1],  R[0]Cj]); 
for  (k  =  2;  k  <=  numa;  ++k)  { 

if  (RCk-lKj])  { 

cout  <<  "\n\t\t\t\t\t\t\t  R"  <<  k  <<  "  =  "; 
printf ("%6 . 2f ",  RCk-l][j]);  }  }  ++j;  } 

printf ("\n\nNOTE:  Stage  1  moment  based  on  Kiewit  criteria  is 

%6.1f  kip-ft.",  Mk[0]); 
if  (numa  >  0)  { 

printf("\n  Stage  2  moment  based  on  Kiewit  criteria  is  %6.1f 

kip-ft",  Mk[l]); 

print£("\n  and  reaction  force  is  %6.1f  kips.",  Rk);  } 

if  (numa  >  1)  printf ( "\nNOTE :  Minimum  depth  of  embedment  based 
on  maximum  moment  is  %3.1f  feet.",  Dmin); 
if  ((D[numa]  <  6)  ! I  (Dmin  <  6))  { 

cout  <<  "\nNOTE:  NYCTA  recommends  minimum  penetration  depth  of 
six  feet.";  }  } 

if  ((soil_type  ==  2)  SS  (str_anal  ==  1)) 

printf  ("\nNOTE:  A  total  stress  analysis  approach  was  used."); 
if  ((soil_type  ==  2)  6&  (str_anal  ==  2)) 

printf  ("\nNOTE:  An  effective  stress  analysis  approach  was 
used."); 

cout  <<  "\n\nPress  the  enter  key  to  return  to  the  main  menu.  "; 
gets(cc);  } 
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/  /  *********lk**************************************************** 

//  *  SAND  ANALYSIS  FUNCTION 

//  *  Execute  analysis  for  sands 

//  ************************************************************* 
void  sand_analysis( void)  { 

II  ************************************************************* 

//  *  STAGE  I  -  SAND 

II  ************************************************************* 

j=0;  i=0;  v=0;  y=0; 

if  (nutna)  hh  =  anc[j]  -  w; 

else  hh  =  belev; 
ka_kp( ) ; 
strip( ) ; 

hh  =  telev  -  hh; 

sigh  =  Ka*wt*hh*s*hh/2 ;  //  Horizontal  Stress  due  to  Soil 

sigs  =  Ka*qe*s*hh;  //  Horizontal  Stress  due  to  Surcharge 

PP  =  (3*Kp/f s-Kab)*bf *wtb; 

z[0]  =  0;  /*  Zero  Shear  */ 

u  =  0; 

while 

(sigh  +  sigs  +  Kab*(wt*hh+qe)*bf *z[0]  -  pp*z[0]*z[0]/2  +  u  >  0) 

{  z[0l  =  zCO]  +  0.05; 

if  (gwt  >=  (telev  -  hh  ) )  u  =  0.0312*bf *(3*Kp/fs-Kab)*r[0]*zC0] ; 
else  u  =  0;  } 

if  (  (gwt  >  telev  •  hh  -  z[0])  SS  (gwt  <  telev  -  hh)  ) 

{  z[0]  =  0; 

while  (sigh  +  sigs  +  Kab*(wt*hh+qe)*bf *z[0]  -  pp*z[0]*z[0]/2  + 

0 .0312*bf *(3*Kp/fs-Kab)*(z[0]-telev+hh+gwt)*(z[0]-telev+hh+gwt ) 

>  0)  z[0]  =  z[0]  +  0.05;  } 

V  =  z[0];  /*  Calculate  Maximum  Moment  */  if 

(gwt  <=  (telev  -  hh  -  z[0]))  u  =  0; 

else 

{  if  (gwt  >=  telev  -  hh)  u  =  0 .0104*bf *(3*Kp/f s-Kab)*v*v*v; 
else  u  =  0 .0104*bf *(3*Kp/fs-Kab)*pow( ( v-telev+hh+gwt ) , 3) ;  } 

M[0]  =  sigh*(hh/3+v)+  sigs*(hh/2+v)+  Kab*bf *(hh*wt+qe)*v*v/2- 
pp*v*v*v/6+  u; 

S[0]  =  M[0]/2.4;  /*  Calculate  Section  Modulus  */ 

V  =  0;  /*  Calculate  Depth  of  Embedment  */ 

u  =  0; 

while  (sigh*(hh/3+v)+sigs*(hh/2+v)+Kab*bf*(wt*hh+qe)*v*v/2- 
pp*v*v*v/6+u  >0)  {  V  =  V  ♦  0.05; 

if  (gwt  >=  (telev  -  hh  ) )  u  =  0.0104*bf *(3*Kp/fs-Kab)*v*v*v; 
else  u  =  0;  } 

if  ((gwt  >  telev  -  hh  -  v)  &&  (gwt  <  telev  -  hh)  )  {  v  =  0; 

while  (sigh*(hh/3+v)+  sigs*(hh/2+v)+  Kab*bf *(hh*wt+qe)*v*v/2- 
pp*bf*v*v*v/6  ♦  0.0104*bf*(3*Kp/fs-Kab)*pow( (v-telev+hh+gwt) ,3) 
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>0)  v=v+0.05;  } 

D[0]  =  v; 
z[0]=hh+z[0]; 

//  Calculate  Moment  based  on  Kiewit  Analysis 

Mk[0]  =  Ka*qe*hh*s*(hh/2+2)+Ka*wt*hh*hh*s*(hh/3+2)/2;  Dmin  =  7; 
cout  <<  "XnXnXtXt  STAGE  1  COMPLETED."; 


II  ************************************************************** 

//  *  STAGE  II  -  SANDS 

II  ************************************************************** 


if  (numa)  {  ++i; 

j  =  1;  V  =  0;  y  =  0; 

if  (numa  ==  1)  hh  =  belev; 

else  hh  =  ancCj]  -  w; 
ka_kp ( ) ; 
strip( ) ; 

hh  =  telev  -  hh; 

sigh  =  Ka*wt*s*hh*hh/2 ;  /*  Horizontal  Stress  due  to  Soil 

*/  sigs  =  Ka*qe*s*hh;  /*  Horizontal  Stress  due  to 

Surcharge  */  pp  =  ( 3*Kp/f s-Kab)*wtb*bf ; 

V  =  0; 

u  =  0; 

while  (sigh  +  sigs  +  Kab*(hh*wt+qe)*bf *v  -  pp*v*v/2  +  u  >  0)  { 

V  =  V  +  0.05; 

if  (gwt  >=  (telev  -  hh  ) )  u  =  0.0312*bf*(3*Kp/fs-Kab)*v*v; 
else  u  =  0;  } 

if  (  (gwt  >  telev  -  hh  -  v)  (gwt  <  telev  -  hh)  ) 

{  V  =  0;  u  =  0; 

while  (sigh  +  sigs  +  Kab*(hh*wt+qe)*bf *v  -  pp*v*v/2  + 

0 . 0312*bf * ( 3*Kp/f s-Kab) *( v-telev+hh+gwt ) *( v-telev+hh+gwt )  >  0) 
v=v+0.05;} 

/*  Reaction  Force  */ 
if  (gwt  <=  (telev  -hh-v))  {u=0;  } 
else 

{  if  (gwt  >=  telev  -  hh)  {  u  =  0.0104*bf*(3*Kp/fs-Kab)*v*v*v;  } 
else  {  u  =  0 .0104*bf*(3*Kp/fs-Kab)*pow( (v-telev+hh+gwt) ,3) ;  }  } 

R[0][0]  =  (sigh*(hh/3+v)+  sigs*(hh/2+v) +  Kab*(wt*hh+qe)*bf *v*v/2 

-  pp*v*v*v/6  +  u)  /  (hh+anc[0]-telev+v) ; 

V  =  0;  u  =  0;  /*  Zero  Shear  */ 

while  (R[0][0]  -  sigh  -  sigs  -  Kab*(wt*hh+qe)*bf *v  +  pp*v*v*bf/2 
-u<0)  {v=v+  0.05; 

if  (gwt  >=  (telev  -  hh  ) )  u  =  0.0312*bf*(3*Kp/fs-Kab)*v*v; 
else  u  =  0;  } 

if  (  (gwt  >  telev  -hh-v)  &&  (gwt  <  telev  -  hh)  )  {  v  =  0; 

while  (  R[0][0]  -  sigh  -  sigs  -  Kab*(wt*hh+qe)*bf*v  +  pp*v*v*bf/2 

-  0 . 0312*bf *( 3'*Kp/f s-Kab) * ( v-telev+hh+gwt )*( v-telev+hh+gwt )  <  0) 

V  =  V  +  0.05;  } 
zCl]  =  v; 
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if  (gwt  <=  (telev  -  hh  -  v))  {  u  =  0;  }  //  Maximum  Moment 
else 

{  if  (gwt  >=  telev  -  hh)  u  =  0.0104*bf*(3*Kp/fs-Kab)*v*v*v; 
else  u  =  0 .0104*bf*(3*Kp/fs-Kab)*pow( (v-telev+hh+gwt) , 3) ;  } 

M[l]  =  sigh* ( hh/3+z [ 1 ] )  +  sigs*(hh/2+z[l] )  + 
Kab*(wt*hh+qe)*bf*z[l]*zCL]/2  -  pp*z [ 1 ] *z [ 1 ] *z [ 1 ] / 6  - 
R[0] [0]*(hh-telev+anc[0]+z[l] )  +  u;  S[13  =  M[l]/2.4; 

//  Section  Modulus 

D[l]  =  0;  u  =  0;  /*  Depth  of  Embedment  */ 

while  (M[l]  -  Ka*(qe+(telev-anc[0] )*wt)*pow( (hh- 
telev+anc[0])  ,2)*s/2  -  s*Ka*wt'*’pow(  (hh- tel  ev+anc[0  ] ) ,  3 )/ 3  - 
bf *Kab*(qe+hh*wt ) *DC 1] *(D[ 1 ]/2+hh-telev+anc[0 ] )  + 
pp*D[l]*D[l3/2*(2*D[l]/3+hh-telev+anc[0])  -  u  <  0  ) 

{  D[l]  =  D[l]  +  0.05; 
if  (gwt  >=  (telev  -  hh  ) ) 

u  =  0.0312*bf*(3*Kp/fs-Kab)*DEl]*D[l]*(2*D[l]/3+hh-telev+anc[0]) ; 
else  u  =  0;  } 

if  ((gwt  >  telev  -  hh  -  DCl])  &&  (gwt  <  telev  -  hh)  )  {  D[l]  =  0; 
while  (  M[l]  -  Ka*(qe+(telev-anc[0] )*wt)*pow( (hh  - 
telev+anc[0] ) , 2)*s/2  -  s*Ka*wt*pow( (hh-tel ev+anc[0] ) , 3)/3 
+  pp*D[l]*D[l]/2*bf*(hh-telev+anc[0]+2*D[l]/3)  - 
b£*Kab*(qe+hh*wt )*D[l]*(D[l]/2+hh-telev+anc[0] )  - 
0.0312*bf*(3*Kp/fs-Kab)*pow((D[l]-telev+hh+gwt) ,2)* 
(D[l]+hh-telev+anc[0]-(D[l]-telev+hh+gwt)/3)  <  0) 

DCl]  =  DCl]  +  0.05;  } 
zCl]  =  zCl]  +  hh; 

//  Calculate  Moment  &  Reaction  based  on 

Kiewit  y  =  hh-telev+ancCO ] ; 

MkCl]  =  Ka*s*y*y*(qe+wt/2*(hh+telev-ancC0] ) )/9; 

Rk  =  Ka*qe*s*(telev-ancC0] )  +  Ka*wt*s*pow((telev-ancC0]) ,2)/2  + 
(Ka*s*y*y/2*(qe+wt*(telev-ancC0] ) )  +  y*y*y*Ka*s*wt/6)/y ; 
cout  <<  "\n\t\t  STAGE  2  COMPLETED.";} 

II  ************************************************************** 

//  *  STAGE  III  -  SANDS 

II  ************************************************************** 

j  =  2; 

whi 1 e  ( j  <  =  numa )  { 

V  =  0;  y  =  0;  /*  Average  Unit  Wt  &  Fricion 

Angle  if  (j  <  numa)  hh  =  ancCj]  -  w; 

else  hh  =  belev; 
ka_kp( ) ; 
strip( ) ; 

sigs  =  Ka  *  qe;  /*  Horizontal  Stress  due  to  Surcharge  */ 

sigh  =  0.65  *  Ka  *  wt  *  (telev  -  hh); 

/*  Horizontal  Stress  due  to  Soil  */ 

for  (i  =  0;  i  <  10;  i++)  {  RCi][j-l]  =  0;  > 

for  (k  =  0;  k  <  j;  ++k)  /*  Calculate  Reaction  Forces  */ 
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{  if  (k  <  j  -  1)  H  =  anc[k+l]; 
else  H  =  hh; 

V  =  0 ; 

for  (  i  =  1;  i  <=  k;  ++i)  v  =  R[i-l][j-l]  *  (anc[i-l]  -  H)  +  v; 
RCk][j-l]  =  (pow( (telev-H) ,2)*(sigh+sigs)*s/2  -  v)  /  (anc[k]-H); 

}  i  =  0; 

//  Calculate  point  of  Zero  Shear 

V  =  R[0][j-1]; 

while  (v  -  (telev  -  anc[i])  *  (sigh  +  sigs)  *  s  >  0  ) 

{  V  =  R[++i][j-l]  +  v; 

if  (i  ==  j  -  1)  break;  } 

zCj]  =  V  /  ({sigh  +  sigs)  *  s); 

V  =  0;  /*  Calculate  Maximum  Moment  */ 

i  =  0;  M[j]  =  0; 

while  (telev  -  anc[i]  <  z[j]) 

{  V  =  R[i]Cj-l]  *  (z[j]  -  telev  +  anc[i]); 

++i; 

M[j]  =  M[j]  +  v; 
if  (i  ==  j)  break;  } 

M[j]  =  M[j]  -  (sigh  +  sigs)  *  s  *  z[j]  *  z[j]  /  2; 

S[j]  =  M[j]/2.4; 

/*  Calculate  Depth  of  Embedment  */ 

V  =  MCj];  min_D();  D[j]  =  y; 
if  (j  ==  numa)  {  Mmax  =  M[0]; 

for  (i  =  1;  i  <=  numa;  i++)  if  (M[i]  >  Mmax)  Mmax  =  M[i]; 

V  =  Mmax;  min_D();  Dmin  =  y;  } 

+  + j; 

cout  <<  ’'\n\t\t  STAGE  ”  <<  j  <<  "  COMPLETED.”; 

}  } 

j  j  ************************************************************** 

//  *  CLAY  ANALYSIS  FUNCTION 

//  *  Execute  analysis  for  clays. 

II  ************************************************************** 

void  clay_analysis( void)  { 
fa  =  0;  j  =  0; 

II  ************************************************************** 
//  *  STAGE  I  -  CLAYS 

II  ************************************************************* 

if  (numa)  hh  =  anc[0]  -  w; 

else  hh  =  belev; 
float  hhh  =  telev  -  hh; 

wt_c_cb();  /*  Calculate  Average  unit  wt,  c,  and  c  base  */ 
stripO; 

zt  =  (2*ca-qe)/wt;  /*  Depth  of  Tension  Zone  */ 

if  ( (6/fs*cb+2*cb-qe-wt*(telev-hh)  <  0)) 
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{  V  =  {6*cb/fs+2*cb-qe)/wt; 

printf ("\a\n\n\nERROR  -  Soil  will  not  support  the  wall  below  a 
depth  of  %4.2f  feet.”,  v); 
z[0]  =  -1;  goto  q;  } 

if  ((hh  >=  telev  -  zt)  &&  (zt  >=  0)) 

{  MCO]  =  0;  z[0]  =  0;  SCO]  =  0;  D[0]  =  0;  } 
if  ((hh  <  telev  -  zt)  &S  (zt  >=  0))  { 

sigh  =  s*(wt*hhh+qe-2*ca)*(hhh-zt)/2;  /*  Active  Pressure  */ 
pp  =  (6*cb/fs+2*cb-wt*hhh-qe)*bf ;  //  Result.  Resistance  Press. 

z[0]  =  sigh  /  pp;  /*  Zero  Shear  */ 

M[0]  =  sigh* ( ( hhh-zt ) / 3+z [ 0 ] )  -  pp*z[0]*z[0]/2;  //  Max.  Moment 
D[0]  =  0;  /*  Depth  of  Embedment  */ 

while  (sigh*((hhh-zt)/3+D[0])-pp*D[0]*D[0]/2  >  0)  D[0]  =  D[0]  + 
0.05; 

z[0]  =  z[0]  +  hhh;  } 
if  (  zt  <  0)  { 

pp  =  (6*cb/fs+2*cb-wt*hhh-qe)*bf  /*  Resultant  Resist  Pres  */ 
z[0]  =  ( (qe-2*ca) *hhh*s  +  wt*hhh*hhh/2*s)  /  pp;  /*  Zero  Shear  */ 
//  Max.  Moment 

MCO]  =  (qe-2*ca)*hhh*s*(hhh/2+z[0])+wt*hhh*hhh/2*s*(hhh/3+z[0]) 
-pp*z[0]*z[0]/2; 

D[0]  =  0;  /*  Depth  of  Embedment  */ 

while  (s*(qe-2*ca)*hhh*(hhh/2+DC0])  +  wt*hhh*hhh/2*s*(hhh/3+D[0] ) 
-  pp*D[0]*D[0]/2  >  0)  D[0]  =  D[0]  +  0.05; 

z[0]  =  zCO]  +  hhh;  } 

S[0]  =  M[0]/2.4; 

//  Kiewit  Analysis 

MkCO]  =  0; 

if  (zt  <  0)  Mk[0]  =  s*wt*hhh*hhh/2*(hhh/3+2)  + 
s*(qe-2*ca)*hhh*(hhh/2+2) ; 
if  ((zt  >=  0)  &&  (zt  <  hhh)) 

Mk[0]  =  s*(wt*hhh+qe-2*ca)  *  (hhh-zt)/2  *  ( (hhh-zt )/3+2 ) ; 

Dmin  =  7;  Kp  =  zt; 

//  Set  zt,  stage  1  equal  to  Kp  to  compare  to  zt,  stage  2 
cout  <<  ”\n\n\t\t  STAGE  1  COMPLETED."; 

II  ************************************************************** 
//  *  STAGE  II  -  CLAYS 

II  ************************************************************** 

if  ( numa )  { 
j  =  1; 

if  (numa  ==  1)  hh  =  be lev; 

else  hh  =  anc[l]  -  w; 
wt_c_cb( ) ; 
stripO; 

zt  =  ( 2*ca-qe)/wt ; 
if  (zt  >  Kp)  zt  =  Kp; 
hhh  =  telev-hh; 
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if  ( ( 6/fs*cb+2*cb-qe-wt*( telev-hh)  <  0)) 

{  V  =  (6*cb/fs+2*cb-qe)/wt; 

printf ( "\a\n\n\nERROR  -  Soil  will  not  support  the  wall  below  a 
depth  of  %4.2f  feet.",  v); 
zCO]  =  -1;  goto  Q;  } 
if  ((hh  >  telev  -  zt)  &&  (zt  >=  0)) 

{  M[l]  =  0;  z[l]  =  0;  R[0][0]  =  0;  S[l]  =  0;  D[l]  =  0;  Rc  =  0 ; 
Mc[l]  =  0;  } 

if  ((hh  <  telev  -  zt)  &&  (zt  >=  0))  { 
hh  =  telev  -  hh; 

sigh  =  s*(wt*hh+qe-2*ca)*(hh-zt)/2; 
pp  =  ( 6*cb/f s+2*cb-wt*hh-qe) *bf ; 

V  =  sigh  /  pp;  /*  Zero  Earth  Forces  */ 

R[0][0]  =  (sigh*( (hh-zt)/3+v)  -  pp*v*v/2)  /  (hh-telev+anc[0]+v) ; 
z[l]  =  (sigh  -  RCOlCO])  /  pp;  /*  Zero  Shear  */ 

M[l]  =  sigh*( (hh-zt)/3+z[l] )  -  pp*z[l]*z[l]/2  -  R[0][0]*(hh 
-telev+anc[0]+z[l] ) ;  D[l]  =  0; 
if  (anc[0]  >  telev-zt)  { 

while  (M[l]  +  pp*D[l3*(D[l]/2+hh-telev+anc[0] )  -  sigh  * 
(hh+anc[0]-telev-(hh-zt )/3)  <  0) 

D[l]  =  D[l]  +  0.05;  } 
else  { 

while  (M[l]  +  pp*D[l]*(D[l]/2+hh-telev+anc[0] )  - 
s*(qe-2*ca+wt*( telev-anc[0] ) )*  pow( (hh-telev+anc[0] ) ,2)/2  - 
s*wt*pow( (hh-telev+anc[0] ) , 3)/3  <  0) 

D[l]  =  DCl]  +  0.05;  } 

2(1]  =  2[1]  +  hh;  } 

if  (zt  <  0)  {  hh  =  telev  -  hh; 

pp  =  (6*cb/fs+2*cb-wt*hh-qe)*bf ; 

sigh  =  s*wt*hh*hh/2 ; 

sigs  =  s*(qe-2*ca)*hh; 

V  =  (sigh  +  sigs)  /  pp; 

R[0][0]  =  (sigh*(hh/3+v)  +  sigs*(hh/2+v)  -  pp*v*v/2)  /  (hh 
-telev+ancC0]+v) ; 

z[l]  =  (sigh  +  sigs  -  RC0][0])  /  pp; 

M[l]  =  sigh*(hh/3+z[l] )  +  sigs*(hh/2+z[l] )  -  pp*z[l]*z[l]/2  - 
RCO] [0]*(hh-telev+anc[0]+z[l] ) ; 

D[l]  =  0; 

while  (M[l]  +  pp*D[l]*(DCl]/2+hh-telev+anc[0] )  - 
s*(qe-2*ca+wt*( telev-anc[0] ) )  *  pow( (hh-telev+anc[0]) ,2)/2  - 
s*wt*pow{ (hh-telev+anc[0] ) ,3)/3  <  0)  D[l]  =  D[l]  +  0.05; 

2[1]  =  2[1]  +  hh;  } 

SCI]  =  M[l]/2.4; 

H  =  hhh-zt;  //  Kiewit  Analysis 

V  =  telev  -  anc[0]; 

y  =  hhh-telev+anc[0] ; 

Mk[l]  =  Rk  =  0; 

if  (zt  <  0)  {  Mk[l]  =  s*y*y*(qe  -  2*ca  +  wt*v  +  wt*y/2)/9; 
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Rk  =  s*(qe-2*ca)*v  +  s*wt*v*v/2  + 

s*( (qe-2*ca+wt*v)*y/2+wt*y*y/6) ;  } 

if  (((zt  >=  0)  &&  (zt  >=  y))  (zt  <  hhh))  { 

Mk[l]  =  s*y*y/9  *  (qe-2*ca+wt*hhh)*H/ ( 2*y ) ; 

Rk  =  s*(wt*hhh+qe-2*ca)*H*H/(6*y) ;  } 
if  ((zt  >=0)  S&  (zt  <  y))  { 

MkClj  =  s*y*y/9  *  (qe  -  2*ca  +  wt*v  +  wt*y/2); 

Rk  =  s* ( ( qe-2*ca+wt*v ) * ( v-zt ) /2  +  ( qe-2 *ca+wt*v ) *y/ 2  +  wt*y*y/6); 
}  cout  <<  "\n\t\t  STAGE  2  COMPLETED.";  } 

j  j  ■kicifkit1c1eii1c-kifk*1c1i*1c1fkifk1cifk1e-k'k*1fk1fk1c1fkifkic*1cifk1c'k1c1i‘k1c1t1fk1i1(1f1t1ck1(1fkii1c 

//  *  STAGE  III  -  CLAYS 

if  (numa  >1)  { 
j  =  2; 

whi 1 e  ( j  <  =  numa )  { 
double  a,  h; 

if  (j  <  numa)  hh  =  anc[j]  -  w; 
else  hh  =  belev; 
wt_c_cb( ) ; 
strip( ) ; 

if  ( ( 6/f s*cb+2*cb-qe-wt* ( tel ev-hh)  <  0)) 

{  V  =  (6*cb/fs+2*cb-qe)/wt; 

printf ("\a\n\n\nERROR  -  Soil  will  not  support  the  wall  below  a 
depth  of  %4.2f  feet.",  v); 
zCO]  =  -1;  goto  Q;  } 

float  Ns  =  wt*(telev-hh)/ca;  /*  Stability  Number  */ 

for  (i  =  0;  i  <  10;  i++)  R[i][j-1]  =  0; 

for  (k  =  0;  k  <  j;  k++)  { 

if(k<j-l)H=  anc[k+l]; 

else  H  =  hh; 

h  =  telev  -  hh; 

a  =  telev  -  H; 

V  =  0 ; 

if  (gwt  >  H)  u  =  0 . 0104*pow( (gwt-H) , 3 )*s ; 
else  u  =  0; 

for  (i  =  1;  i  <=  k;  i++)  v  =  R[i-l][j-l]  *  (anc[i-l]  -  H)  +  v;  if 
(Ns  <=  6) 

{  if  (a  <  h/4)  sigh  =  1 . 6*wt*pow(a, 3)/ 6; 
if  ((a  >=  h/4)  &&  (a  <=  3*h/4)) 

sigh  =  0.05*wt*h*h*(a-h/6)  +  0 . 2*wt*h*pow( (a-h/4) , 2 ) ; 

if  (a  >  3*h/4)  sigh  =  wt*pow(h,  2)*(0 .05*(a-h/6)  +  0 . 2*(a--h/2) ) 

+  0.4*wt*pow((a-.75*h),2)*(h-2*a/3);  } 
if  (Ns  >  6) 

{  Ka  =  1  -  4*ca/(wt*h); 

if  (a  <  h/4)  sigh  =  2*Ka*wt*a*a*a/3 ; 

else  sigh  =  Ka*wt*h*h/8*(a-h/6)  +  Ka*wt*h*pow( (a-h/4) ,2)/2;  } 
RCk][j-l]  =  (s*qe*pow( ( telev-H) , 2)/2  +  s^sigh  -  v  +  u)  / 
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(anc[k]-H);  } 

V  =  0;  /*  Calculate  point  of  Zero  Shear  */ 

u  =  0;  zCj]  =  0; 

for  (i  =  0;  i  <  numa;  i++)  v  =  R[i][j-1]  +  v; 
if  (Ns  <=  6)  { 

while  (  V  +  0 . 05*wt*h*h*s  -  (qe+0 . 4*wt*h) *s*z [ j ]  -  u  >  0)  { 
z[j]  =  z[j]  +  0.05; 

if  (telev  -  z[j]  <=  gwt)  u  =  0 . 0312*s^pow( ( z [ j ] - tel ev+gwt ) , 2 ) ;  }} 
if  (z[j]  >  3*h/4)  { 

while  (v-  s*qe*z[j]  -u  -  s* ( 0 . 25*wt*h*h+  wt* ( h-0 . 8*z [ j ] )  * 

(z[  jl-O.VS^fh))  >  0) 

{  z[j]  =  z[j]  +  0.05; 
if  (telev-z[j]  <=  gwt) 

u  =  0.0312*s*pow( (z[ j]  -  telev  +  gwt), 2);  }  } 

if  (Ns  >  6)  { 

while  (  V  +  s*Ka*wt*h*h/8  -  s*(Ka*wt*h+qe)*z[ j]  -  u  >  0) 

{  z[j]  =  z[j]  +  0.05; 

if  (telev-z[j]  <=  gwt)  u  =  0 . 0312*s*pow( ( z [ j ] -telev+gwt ) , 2 ) ;  }  } 

V  =  0;  /*  Calculate  Maximum  Moment  */ 

M[j]  =  0; 

for  (i  =  0;  i  <  j;  ++i) 

{  V  =  R[i][j-1]  *  (z[j]  -  telev  +  anc[i]); 

MCj]  =  M[j]  +  v;  } 
if  (Ns  <=  6)  { 

if  (z[j]  <=  3*h/4)  sigh  =  0 .05’*'wt*h*h*(z[  j]-h/6)  + 

0 . 2*wt*h*pow( (z[ j]-h/4) , 2) ; 

else  sigh  =  0 . 05*wt *h*h*( z [ j]-h/6 )  +  0 . 2*wt*h*h*( z[ j]-h/2)  + 
0.4*wt*pow((zC j]-.75*h) ,2)*(h-2*z[ j]/3);  } 

else  sigh  =  Ka*wt*h*h/8*(z[ j]-h/6)  +  Ka*wt*h*pow( (z[ j]-h/4) ,2)/2; 
if  (gwt  >  telev-z[j])  u  =  0 . 0104*s*pow( ( z [ j ] -tel ev+gwt ) , 3 ) ; 
else  u  =  0; 

M[j]  =  M[j]  -  qe*s*z[ j]*z[ j]/2  -  sigh*s  -  u; 

S[j]  =  M[j]/2.4; 

D[j]  =  0;  /*  Calculate  Depth  of  Embedment  */ 

if  (Ns  <=  6)  { 

if  (anc[j-l]  >=  telev-3*h/4) 

sigh  =  0 . 4*wt*h*pow( ( . 75*h-telev+ancC j-1] ) , 2) /2  + 

0 .05*wt*h*h*(5*h/6-telev+anc[ j-1] ) ; 
else  sigh  =  0 . 8*wt*(h-telev+anc[ j-1] )  * 
pow( (h-telev+anc[ j-1] ) , 2)/3;  } 
else  sigh  =  Ka*wt*h*pow( (anc[ j-l]-hh) , 2)/2; 
if  (gwt  >=  anc[j-l]) 

u  =  0 .0312*(gwt-anc[ j-1] )*pow( (anc[ j-l]-hh) , 2)*s  + 

0 .0208*pow( (anc[ j-l]-hh) , 3)*s; 
if  ((gwt  >  hh)  &&  (gwt  <  anc[j-l])) 

u  =  0 . 0312*pow( (gwt-hh) , 2 ) *(anc[ j-l]-hh- (gwt-hh)/3)*s; 
if  (gwt  <=  hh)  u  =  0; 

while  (M[j]  +  ( e^cb/f s+2*cb-qe)*bf *D[ j]*(D[ j]/2+(anc[ j-l]-hh) )  - 
sigh*s  -  s*qe*pow( (anc[ j-l]-hh) ,2)/2  -  u  <  0) 
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D[j]  =  D[j]  +  0.05; 

+  + j; 

cout  <<  ’’\n\t\t  STAGE  ••  <<  j  <<  "  COMPLETED.";}} 

if  (numa  >  1)  {  Mmax  =  M[0]; 

for  (i  =  1;  i  <=  numa;  i++) 

if  (M[i]  >  Mmax)  Mmax  =  M[i];  Dmin  =  0; 

while  (Mmax  +  ( 6*cb/ f s+2*cb-qe) *bf *Dmin* ( Dmin/ 2+ ( anc[ j- 2 ] -hh ) ) 

-  sigh*s  -  s*qe*pow( (anc[ 3-2}-hh) ,2)/2  -  u  <  0) 

Dmin  =  Dmin  +  0.05;  }  Q:  i  =  0;  } 

II  **1c****1(*1t****-k*1ck******it1t1i**1i*1t*-k*****1t****ii***iiii**it1i*-k****1i* 

//  *  KA_KP  FUNCTION 

//  *  Cal.  average  unit  weight,  friction  angle,  and  Ka  for  cut. 

//  *  Calculate  unit  weight,  friction,  Ka,  and  Kp  for  base  soil. 

II  ************************************************************** 

void  ka_kp(void)  { 

for  (k  =  0;  hh  <  soi 1 [k+1 ] [0 ] ;  ++k) 

{  if  (k  >=  (n\ima-l))  break; 

V  =  soil[k]Cl]  *  (soil[k]C0]  -  soil [k+l][0] )  +  v; 

y  =  soil[k][2]  *  (soil[k][0]  -  soil [k+1] [0] )  +  y;  } 

V  =  V  +  soil[kl[l]  *  (soil[k]C0]  -  hh); 
y  =  y  +  soil[k][2]  *  (soil[k]C0]  -  hh); 
wt  =  V  /  (telev  -  hh) ; 

fa  =  y  /  (telev  -  hh) ; 

I  =  nums  -  1; 

while  (hh  >  soil[l][0])  --1; 
fab  =  soil[l][2]; 
wtb  =  soil[l][l]; 

Kp  =  pow(tan((45  +  f ab/2 ) *pi/180 ) , 2 ) ;  /*  Calculate  Ka  &  Kp  */ 

Kab  =  pow(tan((45  -  fab/2 )*pi/180) , 2 ) ; 
if  (b  ==  0)  {  Ka  =  pow(tan((45  -  fa/2)*pi/180) ,2) ;  } 
else  {  Ka  =  pow( cos( f a*pi/180 ) , 2 )/ ( cos( f a*pi/270 ) *pow( 1+sqrt 
(sin(fa*pi/108)*sin( (fa*pi/180)/(cos( fa*pi/270)  * 
cos(b*pi/180))),2));  }  } 

II  ************************************************************** 

//  *  MIN_D  FUNCTION 

//  *  Calculate  min.  embedment  depth  for  stage  III  of  sand  excav. 

II  ************************************************************** 

void  min_D(void)  {  u  =  y  =  0; 

while  (v  +  Kp/f s*l . 5*wtb*bf *y*y*( 2*y/3-hh+anc[ j-1] ) 

-  (sigh+sigs)*(anc[ j-l]-hh)*(anc[ j-l]-hh)*s/2  -  u  <  0) 

{  y  =  y  +  0.05; 

if  (gwt  >=  hh)  u  =  0 . 0936*bf *Kp/f s*y*y*( 2*y/3-hh+anc[ j-1] ) ; 
else  u  =  0;  } 

if  ((gwt  >  hh  -  y)  &&  (gwt  <  hh)  )  {  y  =  0; 

while  (v  +  Kp/f s*i . 5*wtb*bf *y*y* ( 2*y/3-hh+anc[ j-1] )  - 
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( sigh+sigs ) * ( anc[ j"l ] ~hh) * ( anc[ j- 1 ] -hh) *s/ 2  -  0.0936*bf* 
Kp/fs*pow( (y-hh+gwt ) , 2 )*(y-hh+ancC j-1] - ( y+gwt-hh)/3 )  <  0) 

y=y+0.05;  }  } 

//  *  WT_C_CB  FUNCTION 

//  *  Calculate  average  unit  weight  and  cohesion  for  cut. 

//  *  Also  calculate  average  cohesion  for  base  soils. 

void  wt_c_cb( void )  { 

Ka  =  1; 

V  =  0;  y  =  0; 

for  (k  =  0;  hh  <  soi 1 [ k+1 ] [ 0 ] ;  ++k) 

{  if  (k  >=  (nums-1))  break; 

V  =  soil[k][l]  *  (soii[k][0]  -  soil [k+1] [0] )  +  v; 

y  =  soil[k]C2]  *  (soilik][0]  -  soil[k+l][0] )  +  y;  } 

V  =  V  +  soil[k][l]  *  (soil[k][0]  -  hh); 
y  =  y  +  soilCk][2]  *  (soil[k][oj  -  hh); 
if  {str_anal  ==  1)  u  =  0; 

else  {  if  ((gwt  >  hh)  S&  (j  <  2))  u  =  0 . 0624* (gwt-hh) ; 
else  u  =  0;  } 

wt  =  (v  +  u)  /  (telev  -  hh) ; 
ca  =  y  /  (telev  -  hh); 

int  ij,  jk;  //  Calculate  the  average  cohesion  over  20  ft. 

ij  =  jk  =  nums-1; 

while  (soil[jk][0]  <  hh-20)  --jk; 

while  (soil[ij]C0]  <  hh)  --ij; 

if  (ij  ==  jk)  cb  =  soilCij][2]; 

else  {  y  =  0;  v  =  hh; 

while  (ij  <  jk)  { 

V  =  V  -  soil[ij+l][0]; 

y  =  V  *  soil[ij][2]  +  y; 

V  =  soil [  +  +  i j][0] ;  } 

cb  =  (y  +  (20  -  hh  +  soil[ij][0])  *  soil[ij][2])  /  20;  }  } 


II  ************************************************************** 

//  *  STRIP  FUNCTION 

//  *  Transform  strip  load  to  an  equivalent  surcharge  load  and 

//  *  add  to  the  surcharge  load. 

II  ************************************************************** 

void  strip(void)  { 

double  01  =  atan(qs[2]/(telev-hh) ) ; 

double  02  =  atan( (qs[l]+qs[2] )/(telev-hh) ) ; 

qe  =  2*qs[0]/(pi*Ka)*(02-01)  +  q;  } 
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//  ************************************************************** 

II*  ANCHOR  FUNCTION 

//  *  Perforin  analysis  for  wale  section  modulus,  and  bonded  and 
//  *  unbonded  length  for  tieback  anchor. 

//  ************************************************************** 


void  anchor(void)  { 
cl rscr ( ) ; 

cout  <<  "\n\tEnter  the  spacing  of  the  anchors.  -- 
cm  >>  d; 

cout  <<  "\n\n\tEnter  the  angle  of  the  anchors.  -- 
cin  >>  ang; 

cout  <<  "\n\n\tSelect  soil  type:** 


'\n\t  Type 


Soil  Description 


SPT  N  Value" 


•f 

\n\n\t 

1 

Fine  to  medium  sand 

12 

- 

30 

<< 

"\n\t 

2 

Medium  to  coarse  sand 

20 

- 

45 

<< 

"\n\t 

3 

Sandy  Gravel 

> 

45 

<< 

"\n\n\t 

4 

Medium  Clay 

4  - 

<< 

"\n\t 

5 

Medium  Stiff  Clay 

9 

- 

11 

<< 

"\n\t 

6 

Stiff  Clay 

12 

- 

15 

<< 

"\n\t 

7 

Stiff  to  Very  Stiff  Clay 

16 

- 

20 

<< 

"\n\t 

8 

Very  Stiff  Clay 

21 

- 

30 

<< 

"\n\t 

9 

Very  Stiff  to  Hard  Clay 

> 

30 

<< 

"\n\t*'; 

le 

( (type 

=  atoi(gets(cc) ) )  <=011  type  >= 

10) 

{  cout  <<  **\n\t*'  <<  cc  <<  **  is  an  incorrect  response . \a'* ; 
cout  <<  *'\n\tReenter  soil  type.  --  **;  } 

for  (i  =  0;  i  <  numa;  ++i)  /*  Cal.  Wale  Section  Modulus 

{  V  =  0; 


for  (j  =  0;  j  <  numa;  ++j)  {  if  (v  <  R[i][j])  v  =  R[i][j];  ) 
sw[i]  =v*d*d/  (14.4*s); 

P[i]  =  V  *  d  /  (s  *  cos(ang*pi/180) ) ;  //  Cal.  Anchor  Length 

switch  (type)  { 

case  1:  L[i]  =  pow(10 , ( (P[i ]+68 . 9)/147 ) ) ;  break; 

case  2:  L[i]  =  pow( 10 , ( (P[i]+74. 5 )/182 . 4) ) ;  break; 

case  3:  L[i]  =  pow(10 , ( (P[i ]+144 . 2 )/ 298 . 2 ) ) ;  break; 

case  4:  L[ii  =  P[i]/3.14;  break; 

case  5:  L[i]  =  P[i]/4.71;  break; 

case  6:  L[i]  =  PCi]/6.28;  break; 

case  7:  L[i]  =  P[i]/7.85;  break; 

case  8:  L[i]  =  P[i]/9.42;  break; 

case  9:  L[i]  =  P[i]/11.0;  break;  } 


/*  Calculate  Unbonded  Length  */ 

ul[i]  =  ( (anc[i]-belev)/sin( (45  +  ang  +  fa/2)*pi/180) )  *  sin((45 
-  fa/2)*pi/180);  } 

clrscr( ) ; 


cout  <<  *'\n\t  OUTPUT  FROM  WALE  AND  ANCHOR  ANALYSIS\n*' 

<<  **\n\nSpacing  of  the  anchors  is  *’  <<  d  <<  *'  feet.**  << 

*'\nThe  anchors  are  set  at  an  angle  of  *'  <<  ang  <<  '*  degrees.*' 
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<<  "\nThe  anchors  are  set  in 


switch  (type) 

{ 

case  1 

cout 

<< 

"fine  to  medium  sand.  ;  break; 

case  2 

cout 

<< 

"medium  to  coarse  sand.  ; 

break ; 

case  3 

cout 

<< 

"sandy  gravel.";  break; 

case  4 

cout 

<< 

"medium  clay.";  break; 

case  5 

cout 

<< 

"medium  stiff  clay.";  break; 

case  6 

cout 

<< 

"stiff  clay.";  break; 

case  7 

cout 

<< 

"stiff  to  very  stiff  clay 

.";  break; 

case  8 

cout 

<  < 

"very  stiff  clay.";  break 

t 

case  9 

cout 

<< 

"very  stiff  to  hard  clay. 

";  break;  } 

printf ("\n\n 

ANCHOR  SECTION  MODULUS 

ANCHOR 

ANCHOR 

UNBONDED") ; 

printf ( 

"\n 

ROW 

OF  WALE  (in^3) 

CAPACITY  (kips) 

LENGTH 

(ft) 

LENGTH  (ft)"); 

for  (i  = 

1;  i 

<=  numa;  ++i)  { 

printf("\n  %2d 

%4.1f 

%4.0f 

%4.1f 

%4 

•If",  i,  sw[i-l], 

p[i-l],  L[i-13, 

ul[i-l]);  } 

if  ((type  >=1)  &&  (type  <=  3)) 

cout  <<  "\n\nNOTE:  Tieback  capacity  is  based  on  pressure 
injected  anchors  using  an"  <<"\n  effective  grout  pressure 

in  excess  of  150  psi  with  a  diameter"  <<"\n  between  4  to 

6  inches  and  depth  of  overburden  greater  than  13  feet."; 
else 

cout  <<  "\n\nNOTE:  Tieback  capacity  is  based  on  post-grouted 
anchors  using  an  effective"  <<"\n  grout  pressure  in 

excess  of  150  psi  with  a  diameter  of  six  inches."; 
for  (i  s  0;  i  <  numa;  ++i)  {  if  (ul[i]  <  15)  { 

cout  <<  "\n\nNOTE:  FHWA/RD-82/047  recommends  a  minimum  unbonded 
length  of  15  feet.";  break;  }  } 
bp  =  3; 

cout  <<  "\n\n\nPress  the  enter  key  to  return  to  the  main  menu. 

»  • 

/ 

gets(cc);  } 

II  AA^r*********************************************************** 

//  *  SAVE  FUNCTION 

//  *  Save  the  results  from  the  various  analysis  functions. 

II  ************************************************************** 

void  save(void)  { 

FILE  *xp; 
cl rscr ( ) ; 

cout  ''<  "\n\tEnter  filename  to  save  the  data.  --  "; 
gets( filename) ; 

while  ( ( xp=f open(f ilename, "r") )  !=  NULL)  { 

cout  <<  "\n\tThe  file  already  exits,  do  you  want  to  overwrite  it? 
(Y/N)  --  \a"; 
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gets{cc)  ; 

c  =  toupper(cc[0] ) ; 
switch  (c)  { 
case  'Y':  break; 
case  ' N ' :  cl rscr ( ) ; 

cout  <<  "\n\tReenter  the  filename.  -- 
gets(f ilename) ;  break; 
default  : 

cout  <<  ''\n\t”  <<  cc  <<  "  is  an  incorrect  response,  try  again. 


--  \a"; 
gets(cc) ; 

c  =  toupper(cc[0] ) ;  } 

if  (c  ==  'Y')  {  c  =  'x';  break;  }  } 

xp  =  f open{ f i 1 ename ,  "w+"); 

fprintf  (xp,  "\n\n"); 

fprintf  (xp,  "\t 

****************************************************** 


fprintf  (xp,  "\t 

*  * 

fprintf  (xp,  "\t 

*  Design  of  Soldier  Pile  and  Lagging  * 

fprintf  (xp,  "\t 

*  In  Accordance  with  NAVFAC  DM-7  * 

fprintf  (xp,  ''\t 

*  * 


\n") 

\n") 

\n") 

\n") 

\n”) 


fprintf  (xp,  ”\t 

****************************************************** 


fprintf 
fprintf 
fprintf 
fprintf 
fprintf 
is  %4.2f 
fprintf  ( 
excavati 
fprintf  ( 
if  ( numa ) 
fprintf  ( 
fprintf  ( 


\n") 

xp,  ''\n\n\tl.  WALL  PROPERTIE  S\n''); 
xp,  ”\n\tl.  Engineer:  %s'',  engineer); 
xp,  ''\n\t2.  Project:  %s'',  project); 
xp,  "\n\t3.  Date:  %s",  date); 

xp,  ''\n\t4.  The  elevation  of  the  top  of  the  excavation 
feet.",  telev); 

xp,  "\n\t5.  The  elevation  of  the  bottom  of  the 
on  is  %4.2f  feet.",  belev); 

xp,  "\n\t6.  The  number  of  anchors  is  %d.",  numa); 

{ 

xp,  "\n\t  The  anchors  are  located  as  fol lows: \n") ; 
xP/  "\t\tAnchor\tElevation  (feet)\n"); 


j  =  0; 

for  (i  =  0;  i  <  numa;  ++i)  {fprintf(xp,  "\t\t  %2d\t 

%5.2f\n",  ++j,  anc[i]);  }  } 

fprintf  (xp,  "\n\t7.  The  spacing  of  the  soldier  piles  is  %3.2f 
feet.",  s); 

fprintf  (xp,  "\n\n\n\tll.  SOIL  PROPERTIE  S"); 
fprintf  (xp,  "\n\n\t8.  The  elevation  of  the  water  table  is  %6.2f 
feet.",  gwt); 

fprintf  (xp,  "\n\t9.  The  soil  properties  are  as  follow: \n"); 
fprintf  (xp,  "\n\t  Soil  Type  Elev  Unit  Wt 
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Friction  Angle"); 
fprintf  (xp,  "\n\t 
or  Cohesion");  j  =  0; 
for  (i  =  0;  i  <  nums;  ++i)  { 
fprintf  (xp,  "\n\t  "); 

if  (soil_type  ==  1)  fprintf  (xp,  "sand"); 
else  fprintf  (xp,  "clay"); 

fprintf  (xp,  "  %7.2f  %1.4f  %5.2f", 

soilCj][0],  soil[j][l],  soilCj][2]); 

j++;  > 

fprintf  (xp,  "\n\n\tl0.  The  slope  of  the  ground  behind  the  wall 
is  %2.2f  degrees.",  b); 

fprintf  (xp,  "\n\tll.  The  surcharge  load  is  %3.3f  ksf.",  q); 
fprintf  (xp,  "\n\tl2.  The  strip  load  is  %7.2f  ksf,  %4.2f  feet 
wide,",  qs[0],  qs[l]); 

fprintf  (xp,  "\n\t  and  located  %5.1f  feet  from  the  wall.", 

qs [ 2  ] )  ; 

fprintf  (xp,  "\n\n\n\tIII .  WALL  ANALYSIS  RESUL 
T  S"); 

fprintf  (xp,  "\n\n\tl3.  Estimated  width  of  the  soldier  pile  is 
%3.2f  feet.",  bf); 

fprintf  (xp,  "\n\tl4.  Factor  of  safety  for  passive  resistance  is 
%3.1f.",  fs); 

fprintf  (xp,  "\n\tl5.  The  wall  was  excavated  %3.1f  feet  below 
the  proposed  anchor  location.",  w); 
fprintf  (xp,  "\n\n\tl6.  STAGE  ZERO  MAXIMUM  SECTION 
EMBEDMENT  REACT ION ( S ) " ) ; 

fprintf  (xp,  "\n\t  SHEAR  MOMENT  MODULUS 

depth" ) ; 

fprintf  (xp,  "\n\t  (ft)  (k-ft)  (in“3)  (ft) 

(kips)") ; 

fprintf  (xp,  "\n\t  - 

- - ; 

fprintf  (xp,  "\n\t  1  %6.1f  %6.2f  %6.2f  %6.1f 

z[0],  M[0],  S[0],  D[0]); 

j  =  0; 

for  (i  =  2;  i  <=  numa  +  1;  ++i)  { 

fprintf  (xp,  "\n\t  %d  %6.1f  %6.2f  %6.2f  %6.1f 

R1  =  %6.2f",  i,  z[i-l],  MCi-1],  S[i-13,  D[i-1],  R[0][j]); 
for  (k  =  2;  k  <=  numa;  ++k)  { 

if  (R[k-l][j])  { 

fprintf  (xp,  "\n\t\t\t\t\t\t\t  R%d  =  ",  k); 
fprintf  (xp,  "%6.2f",  R[k-l][j]);  }  } 

++j;  } 

fprintf (xp,  "\n\n  NOTE:  Stage  1  moment  based  on  Kiewit  criteria 
is  %6.1f  kip-ft.",  Mk[0]); 
if  (numa  >  0)  { 

fprintf(xp,  "\n  Stage  2  moment  based  on  Kiewit  criteria 

is  %6.1f  kip-ft",  Mk[l]); 
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fprintf(xp,  "\n  and  reaction  force  is  %6.1f  kips.",Rk);} 

if  (numa  >  1) 

fprintf  (xp,  "\n\n  NOTE:  Minimum  depth  of  embedment  based  on 
maximum  moment  is  %3.1f  feet.",  Dmin); 
if  ((DCnuma]  <  6)  I  I  (Dmin  <  6))  { 

fprintf  (xp,  "\n\n  NOTE:  NYCTA  recommends  minimum  penetration 
depth  of  six  feet.");  } 
if  ((soil_type  ==  2)  S&  (str_anal  ==  1)) 

fprintf  (xp,  "\n\n  NOTE:  A  total  stress  analysis  approach  was 
used.") ; 

if  ((soil_type  ==  2)  S&  (str_anal  ==  2)) 

fprintf  (xp,  "\n\n  NOTE:  An  effective  stress  analysis  approach 
was  used."); 
if  (bp  >  2)  { 

fprintf  (xp,  "\n\n\n\tIV.  ANCHOR  AND  WALE  RES 
U  L  T  S") ; 

fprintf  (xp,  "\n\n\tl7.  Spacing  of  the  anchors  is  %3.1f  feet.", 
d); 

fprintf  (xp,  "\n\tl8.  The  anchors  are  set  at  an  angle  of  %3.1f 
degrees.",  ang); 

fprintf  (xp,  "\n\tl9.  The  anchors  are  set  in  "); 
switch  (type)  { 


case  1 : 
case  2: 
case  3: 
case  4: 
case  5: 
case  6: 
case  7 : 
case  8: 
case  9: 
fprintf 
fprintf 


fprintf  (xp,  "fine  to  medium  sand.");  break; 

fprintf  (xp,  "medium  to  coarse  sand.");  break; 

fprintf  (xp,  "sandy  gravel.");  break; 

fprintf  (xp,  "medium  clay.");  break; 

fprintf  (xp,  "medium  stiff  clay.");  break; 

fprintf  (xp,  "stiff  clay.");  break; 

fprintf  (xp,  "stiff  to  very  stiff  clay.");  break; 

fprintf  (xp,  "very  stiff  clay.");  break; 

fprintf  (xp,  "very  stiff  to  hard  clay.");  break;  } 

(xp,  "\n\t20.\n"); 

(xp,  "\n  ANCHOR  SECTION  MODULUS  ANCHOR 


ANCHOR  UNBONDED"); 


fprintf  (xp,  "\n  ROW  OF  WALE  (in“3)  CAPACITY  (kips) 

LENGTH  (ft)  LENGTH  (ft)"); 

fprintf  (xp,  "\n  - 

. . . "); 

for  (i  =  1;  i  <=  numa;  ++i)  { 

fprintf  (xp,  "\n  %2d  %4.1f  %4.0f 


%4.1f  %4.1f",  i,  sw[i-l],  P[i-1],  L[i-1], 

ul[i-l]);  } 

if  ((type  >=1)  &&  (type  <=  3))  { 

fprintf  (xp,  "\n\n  NOTE:  Tieback  capacity  is  based  on  pressure 
injected  anchors  using  an"); 

fprintf  (xp,  "\n  effective  grout  pressure  in  excess  of 


150  psi  with  a  diameter"); 

fprintf  (xp,  "\n  between  4  to  6  inches  and  depth  of 

overburden  greater  than  13  feet.");  } 
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else  { 

fprintf  (xp,  "\n\n  NOTE:  Tieback  capacity  is  based  on  post 
-grouted  anchors  using  an  effective"); 
fprintf  (xp,  "\n  grout  pressure  in  excess  of  150  psi 

with  a  diameter  of  six  inches.");  } 
for  (i  =  0;  i  <  numa;  ++i)  {  if  (ul[i]  <  15)  { 

fprintf  (xp,  "\n\n  NOTE:  PHWA/RD-82/047  recommends  a  minimum 
unbonded  length  of  15  feet.");  break;  }  }  } 
fprintf  (xp,  "\n\n\t\t\tE  ND  OF  ANALYST  S"); 
fprintf  (xp,  "\n\n"); 
f close( xp) ; 

cout  <<  "\n\tData  saved,  press  the  enter  key  to  return  to  the 
main  menu.  ";  gets(cc); 

11  *************4r*******************4t*4c*******4c*****4(*4r********** 

II*  END  OF  PROGRAM 

II  it*1tifk*-kifk1fk-k*1t1tit1(1cit1c1c1fk1c-k1fk1c1c1t1cic1ck1c*ic*ickiclfk1c1t*1t1fk*1fk1c**1t*it*1(*1t 

} 
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APPENDIX  C 


CALCULATIONS  AND  EQUATIONS 
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jAI-JDS  : 


'0/z) 

CQ5^(0  "'^) _ . _ _ 

Cjd^  d  Cory  (9  (m-  ^Is/M  (0  -/^)/qj^  (&^9)  C^(0 

^  -  |i'a»cT'c»J  /J^J<2iUe  ^  -  St-Of^  OF 

p  -  /n/clia/aTiok/  of^  K/Ai-i-  ^  -  FB-‘cnosJ  A'JiSuE  se.rvje.eK]  P/uE  pSo'i— 

SemN/6k  6  '  "B  -  caki  ee  i?Ei>ucet>  ttd 

K^=  -  -.— —  - 

0^(ZQ)/i)  Q  \  +  J  s.^J  ( S^f/j)  sjk;  ( ^  -/3)/cd^ (7.^/3  ) ^ 


fAluJte  ^/2. 

K  p  -  Ta>^«)  (46  f  0/z) 


/« _ rA>ujtm, 

/  StrVMX. 

/-Px 


TWE^£Focj£  n 


01=  Ka??:  ^  Pi^Ka/HVa  ’^^K.ay 


"  Kp  ^  FAS-srve  Rs^m^O£  Acts  oJ 

rhf 


2k(v 


[*s  M*s 


ft, 


Zeeo  SHe^e.=  0=  Kata’  H,V2»S> +i<a<j.Hi»S+  l^i{TlHi-^%)Ui 

—  ^■*Ki’/'ft ^/z. 


Scu/C  Foe.  i , 


Max  Mooajr^  £.H?=  Hi'y'Z.»5(w»/s+^  ■t-K9.^V\>*S('H,A+W) 

K(st  Z%.-'^3Kp/J^J-Ksb)abt>f 
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3TAi(a^  nC  •  Z  OR.  Mope  Af4CWc-Rs. 

0.^>S  K-alJWs 


feA<2r/<DNj  — 


t’h  ^3<r 


^'wiutu 


SAse . 


IfAK^^Rl4(’AZ-AO'r^l,  +  KT4r')5AJ/Z  =  0  "'’'V  T~^~^ 

_  s>se . 

Ki  -  ^(^♦-K3s<^)a1  J/z/a7--a0 
SiWiACV,  R.£  =  Cjf  ^cr^+ ^3yi  -  Mhs-M.) 

Q(~ 

l<r^<-K,^)Al»/2  -  'l  Zf  ( / (-^Az-A*) 

SH  EAR-,  iV  O 

o>/L 

2=^  ^ ^3)3 

<■!  ’ 

A/lA\i  A/IcjmckTT  p  Ai') 

-^crKii<3,^)^2:yz 

DEpr^^  <o^='  ^lisvu^hh'n  V> 

ZVA^*0  =  Ms+3Kp/,^^bPy^^^.(^.V3^'M3''Ai-') 

-  ZcThV- f^a)^^Ws-A^T/^  .  ^ 


SaUJ^  ^IL. 
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oem 

Pa  (  ^i/'S  tP)  +  P^(^>/'^+''^')^S  f  '•^^|>4^Vl 

-  /f<.  Xb  dV6  =  (^) 

SoLV^  D  • 

s^Kmz  IL  i  l  smur 

RjtwT  N^er  i'-zce  tM^ebper  P;^  anJP 

•HlWiaCD  M  T^M"  Poin/T  (  2.tK<;  ia  C’w- u»- '"Y 

rPy^o=  P;v)^S+  V  Ki.Pbv^(^+-Miy)  K  -('3^p/fi-K3i.'lb4lSbKy2_ 

Solve  ^(^>2.  V. 

^^AcirriONj  foox^ 

Pi  ^  C  Pa  '•'S  ( Ht/5  V-)0  t-  S(1A-./9  V  'C) 

-t'K%bf{t'  +  Wi.?))'>(Vs  -  -K30* 

3rb)<V6']  /  (  W-i.'A\  A-  'f) 

^ea^L,  ^v  ^o=  Pv  -  Pa  -  P<^ 

Souv/Sr  f'a^  "2:. 

N^A'^.  ^AOMEvK;  t,vA^*  P\(W^'^vr-t)  +  (3Kp-K3k)bf7b?:V6 

—  Pf  /  H2-/2  -^=t)  -  K6b  Ht,-6)  bf  ^V2_ 

Osprn  ^uB^MtaKrr  •• 

£^AM-Ms  +  (3Kp'^<^')b4?b^VLf^+^.-A,f2p/3) 

■"K3l(‘J'+4l^l)(H^-^.t^S/^  - 
KaSU^'Kz-AOVj-  K-shf^V+M)!^ 

P  To/t.  ■v-H-i.-AOi?^  ^0 

S£>LS/\Z  P’dK.  D. 

I?e^ie6P  sSion'/oN/  Modiju;^^  S  ^ 

5=  M/2.4  ^'/a/OjM///€eb  A1/V  Ac.rn 

0 
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CLAVS  : 


1 


HefcsMT  'Tk^JS\Ol^J 

wuee^  Ic  >  ^ 

^LSC.  "t-t.  =C3. 

05.- 

crp  =  t  +  Zc 

Net  Passj\/iE  &sist7^c^  Sgld\J  Botpo^a 

0t=^  ClST: 

Dm  -7  uwtfzDGM  Se^^i-wisiai  ^  Zc  ^  3bf 

»NlTH  (TACTO^  ^  SAJfmr'f  (-^s) 

<r^'  =  6obf/^s 

cTa  -  (c^t 

N)E6»L£Cr  Soi(_  ^L^<,I^AN06 


fJB^T  pp  ^  5=  ( -t-  2.C  -  H  7s)  b*f 


(F^  ^/^S  +  Z-C  <  ^\u  VviiLL.  k/pt  SoFPofcr  *p\e  l^/Ai.L. 


STA<^£  X  •■  WE6ij^cr  TaJiloM  Zou^ 

1*^  ^-t  >  A\  — ?cr  =  0 

IP  Z-C  ^  Al  - ^  CTjta  Tin+Cj -2C 


pp 

■^£ED  SHeAR.,  V -0  =  CIa»(H. 'tci/a  *2  -pp^ 
S=  o:i»(Hi-it'>S/2pp 
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naax.  MoMEvrr ,  2-  ~  ^  w, -zt.)/z  •■  s  *  (  3  *•  *£)  -  pp  ^  /z. 

PCPTVA  OTf  £hA'5to>AEvl<;  P 

l^p^or  CST  (M,-Xt>S/2  *('^■^'=  +  0')  -  pp;e  dV2. 
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\P  ^  t  *C  O  — >  /\J0  Ti^nI'Cv^'  'Z-''JC; 

1E{?0  IV  =  0  ^m'^S/2.  -  pp*^ 

^  =  Q<1-'Z£^H.S+  TfH'^5/l]/pp 


1-2.0 


PP 


Depm  of  EMBerpMeKiT , 

£:(ry-2c)A/,('^^.p)^  2^H,V2*S/M\/3  +  p)  -  ^pv/t=cf> 

SouvC  2?» 

5TA6^  IL  ■  <  Cut  BoTn>»^ 

NIeT  XtRo  Fae.oe»  oi^  EMteDPeo  ^f^Y  =  0 

^  I'TWt  7  -1<^)CH:,-  l*.)/Z  -  pp  *  X  =  o 

X=  stT^Hx+^-ZxiJrMi-lf^/lpp  »r 

KgAcTtotJ  Forcc  ^ 

5  r'JHi.+<f-Ic.)(Hi-t*:)/L^(  +K)-pp^xVz  -  +  ^ 


FOtviT  Of  3UeA«^ 

Lv  =  0  =  s/ifHz -2cy  Vii-Zi^/z.  “'  PP ^  t  —  ^\ 

■?^  =  CSif3Hi+cj-Z.cVHo-Z.-B)/2.  -  R|3/pP 


106 
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j 
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2  S  x-V('ht.-  m)V6  . 
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fP 
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I 

I 


i 
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STAGG  HI 


iTAftiurv  !\lg  ^ 
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jsssZiiJw  rTe  4/Jbi^tf^.^ 
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f^lUU0D  Qjbt^N^riot^  A-r  TI^€~  AsJcH^p^  LjO^Ti^^ 

Xn^D  SoTTofA  C=)f^  XU6'  Cu-r. 

l^=  tlaS*-[iAl  +  ^AiYAI 

^s'=  l4s<-[?H-*i)Yi.>(’<|a  -t4t)f('i-i-iii)^A/iiJ/CU'/^0 

t?ic=  1^+  s 

ClAV.^ 

If  <.o— >  1^1^=  5t[^<j«'2,c-'\AI -1- r‘f-«-‘ic+«A)('h/-A0^2, -J- 

IP*  Z:fc>0  ^  A, 

S*[’('<f4-Zc-(-SH))e^H-itj^J^(^M-Al) 

If  ^fc70  ^  f  t<CAi  — > 

Et-*  S'*  -^c  <-  s(il)(  ^t-l^y-L.  +  fcje  -ZC+  -A)/z, 

t  yru'Ai)^/4j 


111 


STglP  LoaD^ 


COkJ\/£^^  ^TS.iP  Loaxp  F’o.tcs^uz.is 
UhJlfoQ.(^  PR-CSSUK^, 

P=  2-^-l^h/TT  *  f  9i  -  ©i) 

■^2-  "TSa/  S.-t-b/'^') 

9 1  =  -TiNj''  (f  t>/H,  ) 

<^e-  f/K 

c|e  =  'Z.<^/rT  ^  {e^~- e,). 


{z^Pu> 


112 


CfivCOAie  -  d  /s 


WAUE  MkClS\S: 

A5^v/M^  PiiJNieP-, 

Ra.^  d/s 


S-^rA.;M5i  Of-  p;uis 

d  ^  bPAClMdi  ir^  A^^’lHtLS 


R>(.  BY  337o  ro  Acciou-^rr 

pii-£loadiw6(  -re^r. 

1V\  ==•  Ra.  t  d/s  ^  d/A 

-  M/<r;u_  ^  cTauu'  (:)-8*34,Ksi  -  zs-b  ks\ 

,*.  5w  =  RacIV.As/2.^.?> - 9-  Sk/  KxdVv^.^S 


UMBofJDeO  L^k16TH 


LAW  or  St^^: 


H-Al 


S/A/  /'45-/2*/Z) 


cr.r" 


-45'- 


46-^f‘h-t9 


I  -  /LI  .A  .  SfAiH5--0>iJ 

Lu  -  '  S,^j  ^454-0^^4^) 


Rs6iuizjB:>  CAPfi^^  cr  AaIcHoIZ^  ' 


Pt=  Ra. /Ce^  9  if  (d/^) 


113 


i 


0ovit?0D  LjEi^^^TH  ; 


P^/Wg  7®  Ma>lU»A  SA^Jl>  ■ 
A€0-  -  CoAT^^  SANlt>  • 
SAkIPY  : 


■=  \0  C  C  •  ') 

-  iQ  ^  c-i) 

1^  _  j  Q<^ 

/:7e:prw  op^^i>^ist^uiii>B4  7/ll' 
PIAkaCTEK  "^4"  '6'^ 


CLAYS: 


C-uAY 

OJvisisnshlcY 

ULT-  A^»CHo«* 
F^«.ic-r  |o  si 

(  Kip/Pt^'\ 

OUT-  AaJCMoZ, 
CAPA6\7X 
(  k»p/lP') 

\J.  s-nrt:  - 

HAW> 

7. 

/A  OO 

V.  srip^ 

6 

r  42. 

STlCP  - 
V.  STItp^ 

^  7.85 

Srif^P 

4 

^•ZS 

MCb,  STlf^ir 

3 

4.71 

M^IL/M 

z. 

3.14 

^(^lc•no^4  AeeA «  TT  D  ^ » /lp 


D  =  6^'  -  /t,  4PT 

P7a/AriJ7w  Ae€>  r^/'L  /\j^ 

Lilt  aMciao€.  Tticnoio  ^  TT/z.  —  uu'.  A^ka■»c»(^.  CAet^fX 


114 


Figure  C.l 

Average  Load  Capacity  of  Anchors  in  Fine  to 

Medium  Sands 


Figure  C.2 

Average  Load  Capacity  of  Anchors  in  Medium 
To  Coarse  Sands 
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Ckips  > 


Figure  C.3 

Average  Load  Capacity  of  Anchors  in  Sandy  Gravel 
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APPENDIX  D 


EXAMPLE  PROBLEMS 
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***llt*****4c4r***************]lt***********4r********ir 


*  * 

*  Design  of  Soldier  Pile  and  Lagging  * 

*  In  Accordance  with  NAVFAC  DM-7  * 

*  * 


I.  WALL  PROPERTIES 

1.  Engineer:  D' Amanda 

2.  Project:  Sand  Example  #1 

3.  Date:  21  September  1991 

4.  The  elevation  of  the  top  of  the  excavation  is 
250.00  feet. 

5.  The  elevation  of  the  bottom  of  the  excavation  is 
215.00  feet. 

6.  The  number  of  anchors  is  3. 

The  anchors  are  located  as  follows: 

Anchor  Elevation  (feet) 

1  245.00 

2  235.00 

3  225.00 

7.  The  spacing  of  the  soldier  piles  is  4.00  feet. 


II.  SOIL  PROPERTIES 

8.  The  elevation  of  the  water  table  is  0.00  feet. 

9.  The  soil  properties  are  as  follow: 

Soil  Type  Elev  Unit  Wt  Friction  Angle 

or  Cohesion 

sand  250.00  0.1100  30.00 

10.  The  slope  of  the  ground  behind  the  wall  is  0.00 
degrees . 

11.  The  surcharge  load  is  0.500  ksf. 

12.  The  strip  load  is  5.00  ksf,  20.00  feet  long, 
and  located  50.0  feet  from  the  wall. 

III.  WALL  ANALYSIS  RE  S  U  L  T  S 

13.  Estimated  width  of  the  soldier  pile  is  1.00  feet. 

14.  Factor  of  safety  for  passive  resistance  is  1.0. 

15.  The  wall  was  excavated  1.0. feet  below  the  proposed 
anchor  location. 
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16.  STAGE  ZERO  MAXIMUM 
SHEAR  MOMENT 
(ft)  (k-ft) 

SECTION 

MODULUS 

(in"3) 

EMBEDMENT  REACT I ON ( S ) 
DEPTH 

(ft)  (kips) 

1  11.0 

57.53 

23.97 

9.5 

- - 

2  22.9 

59.63 

24.84 

5.8 

R1  = 

31.24 

3  20.5 

71.43 

29.76 

5.4 

R1  = 

53.13 

R2  = 

43.68 

4  30.0 

73.45 

30.60 

5.7 

R1  = 

66.10 

R2  = 

51.41 

R3  = 

58.76 

NOTE:  Stage  1 

moment  based  on  Kiewit  criteria 

is  43.5 

kip-ft . 

Stage  2 

moment  based  on  Kiewit  criteria 

is  44.2 

kip-ft  and  reaction  force  is  27.2  kips. 

NOTE:  Minimum  depth  of  embedment  based  on  maximiim 

moment  is  5.7  feet. 

NOTE:  NYCTA  recommends  minimum  penetration  depth  of 
six  feet. 

IV.  ANCHOR  AND  MALE  RESULTS 

17.  Spacing  of  the  anchors  is  8.0  feet. 

18.  The  anchors  are  set  at  an  angle  of  5.0  degrees. 

19.  The  anchors  are  set  in  medium  to  coarse  sand. 

20. 

ANCHOR  SECTION  MODULUS  ANCHOR  ANCHOR  UNBONDED 

ROW  OF  WALE  CAPACITY  LENGTH  LENGTH 

(in"3)  (kips)  (ft)  (ft) 


1  73.4  133  13.7  16.6 

2  57.1  103  9.4  11.0 

3  65.3  118  11.4  5.5 

NOTE:  Tieback  capacity  is  based  on  pressure  injected 
anchors  using  an  effective  grout  pressure  in 
excess  of  150  psi  with  a  diameter  between  4  to  6 
inches  and  depth  of  overburden  greater  than  13 
feet . 

NOTE:  PHWA/RD-82/047  recommends  a  minimum  unbonded 

length  of  15  feet. 

END  OF  ANALYSIS 
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************************************************ 
*  * 

*  Design  of  Soldier  Pile  and  Lagging  * 

*  In  Accordance  with  NAVFAC  DM-7  * 

*  * 
************************************************ 


WALL 


PROPERTIES 


1.  Engineer:  D' Amanda 

2.  Project:  Sand  Example  #2 

3.  Date:  21  September  1991 

4.  The  elevation  of  the  top  of  the  excavation  is 
10.00  feet. 

5.  The  elevation  of  the  bottom  of  the  excavation  is 
-10.00  feet. 

6.  The  number  of  anchors  is  2. 

The  anchors  are  located  as  follows: 

Anchor  Elevation  (feet) 

1  5.00 

2  -5.00 


The  spacing  of  the  soldier  piles  is  4.00  feet. 


II.  SOIL  PROPERTIES 

8.  The  elevation  of  the  water  table  is  0.00  feet. 

9.  The  soil  properties  are  as  follow: 


Soil  Type 

El  ev 

Unit  Wt 

Friction  Angle 
or  Cohesion 

sand 

10.00 

0.1100 

30.00 

sand 

3.00 

0.1150 

35.00 

sand 

-4.00 

0.1180 

38.00 

10.  The  slope  of  the  ground  behind  the  wall  is  12.50 
degrees . 

11.  The  surcharge  load  is  0.000  ksf. 

12.  The  strip  load  is  0.00  ksf,  0.00  feet  long, 
and  located  0.0  feet  from  the  wall. 

III.  WALL  ANALYSIS  RESULTS 

13.  Estimated  width  of  the  soldier  pile  is  1.00  feet. 

14.  Factor  of  safety  for  passive  resistance  is  1.0. 

15.  The  wall  was  excavated  1.0  feet  below  the  proposed 
anchor  location. 
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16.  STAGE  ZERO  MAXIMUM  SECTION  EMBEDMENT  REACTION(S) 


SHEAR 

(ft) 

MOMENT 

(k-ft) 

MODULUS 

(in^3) 

DEPTH 

(ft) 

(kips) 

1 

10.9 

32.85 

13.69 

9.7 

— 

2 

23.6 

43.25 

18.02 

6.6 

R1  =  23.56 

3 

17.5 

12.32 

5.14 

3.8 

R1  =  44.37 

R2  =  24.65 


NOTE:  Stage  1  moment  based  on  Kiewit  criteria  is  25.2 

kip-f t . 

Stage  2  moment  based  on  Kiewit  criteria  is  44.3 
kip-f t  and  reaction  force  is  18.9  kips. 

NOTE:  Minimum  depth  of  embedment  based  on  maximum 
moment  is  1.7  feet. 

NOTE:  NYCTA  recommends  minimum  penetration  depth  of 
six  feet. 

IV.  ANCHOR  AND  WALE  RESULTS 

17.  Spacing  of  the  anchors  is  9.0  feet. 

18.  The  anchors  are  set  at  an  angle  of  10.0  degrees. 

19.  The  anchors  are  set  in  fine  to  medium  sand. 

20. 


ANCHOR 

ROW 

SECTION  MODULUS 
OF  WALE 
(in“3) 

ANCHOR 

CAPACITY 

(kips) 

ANCHOR 

LENGTH 

(ft) 

UNBONDED 

LENGTH 

(ft) 

1 

27.7 

45 

6.0 

7.4 

2 

15.4 

25 

4.4 

2.5 

NOTE: 

Tieback  capacity 

is  based  on 

pressure 

injected 

anchors  using  an  effective  grout  pressure  in 
excess  of  150  psi  with  a  diameter  between  4  to  6 
inches  and  depth  of  overburden  greater  than  13 
feet . 

NOTE:  FHWA/RD-82/047  recommends  a  minimum  unbonded 
length  of  15  feet. 


END  OF  ANALYSIS 
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************************************************ 
*  * 

*  Design  of  Soldier  Pile  and  Lagging  * 

*  In  Accordance  with  NAVFAC  DM-7  * 

*  * 
************************************************ 

I.  WALL  PROPERTIES 

1.  Engineer:  O' Amanda 

2.  Project:  Clay  Example  #1 

3.  Date:  21  September  1991 

4.  The  elevation  of  the  top  of  the  excavation  is 
100.00  feet. 

5.  The  elevation  of  the  bottom  of  the  excavation  is 
60.00  feet. 

6.  The  nijimber  of  anchors  is  3. 

The  anchors  are  located  as  follows: 

Anchor  Elevation  (feet) 

1  90. Ou 

2  80.00 

3  70.00 


7.  The  spacing  of  the  soldier  piles  is  5.00  feet. 


II.  SOIL  PROPERTIES 

8.  The  elevation  of  the  water  table  is  0.00  feet. 

9.  The  soil  properties  are  as  follow: 

Soil  Type  Elev  Unit  Wt  Friction  Angle 

or  Cohesion 

clay  100.00  0.1100  0.50 

clay  85.00  0.1200  1.75 

10.  The  slope  of  the  ground  behind  the  wall  is  0 
degrees . 

11.  The  surcharge  load  is  0.750  ksf. 

12.  The  strip  load  is  5.00  ksf,  10.00  feet  long, 
and  located  50.0  feet  from  the  wall. 

III.  WALL  ANALYSIS  RESULTS 

13.  Estimated  width  of  the  soldier  pile  is  1.00  feet. 

14.  Factor  of  safety  for  passive  resistance  is  1.0. 

15.  The  wall  was  excavated  1.0  feet  below  the  proposed 
anchor  location. 
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16.  STAGE 

ZERO 

SHEAR 

(ft) 

MAXIMUM 

MOMENT 

(k-ft) 

SECTION  EMBEDMENT  REACTION (S) 

MODULUS  DEPTH 

(in"3)  (ft)  (kips) 

1 

13.6 

119.25 

49.69 

7 . 5 

— 

2 

24.3 

91.14 

37.98 

2.1 

R1  = 

44.13 

3 

25.1 

150.38 

62.66 

2.2 

R1  = 

194.47 

R2  = 

80.75 

4 

34.7 

123.01 

51.25 

2.1 

R1  = 

211.11 

R2  = 

103.15 

R3  = 

128.81 

NOTE:  Stage  1 

moment  based  on  Kiewit  criteria 

is  137.1 

kip-f t . 

Stage  2 

moment  based  on  Kiewit  criteria 

is  65.8 

kip-£t  and  reaction  force  is  29.1  kips. 

NOTE:  Minimum  depth  of  embedment  based  on  maximum 
moment  is  1.9  feet. 

NOTE:  NYCTA  recommends  minimum  penetration  depth  of 

six  feet. 

NOTE:  A  total  stress  analysis  approach  was  used. 

IV.  ANCHOR  AND  HALE  RESULTS 

17.  Spacing  of  the  anchors  is  5.0  feet. 

18.  The  anchors  are  set  at  an  angle  of  7.5  degrees. 

19.  The  anchors  are  set  in  stiff  to  very  stiff  clay. 

20. 


ANCHOR 

ROW 

SECTION  MODULUS 
OF  HALE 
(in-3) 

ANCHOR 

CAPACITY 

(kips) 

ANCHOR 

LENGTH 

(ft) 

UNBONDED 

LENGTH 

(ft) 

1 

73.3 

213 

27.1 

26.7 

2 

35.8 

104 

13.3 

17.8 

3 

44.7 

130 

16.5 

8.9 

NOTE:  Tieback  capacity  is  based  on  post-grouted 

anchors  using  an  effective  grout  pressure  in 
excess  of  150  psi  with  a  diameter  of  six 
inches . 

NOTE:  FHHA/RD-82/047  recommends  a  minimum  unbonded 

length  of  15  feet. 

END  OF  ANALYSIS 
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************************************************ 
*  * 

*  Design  of  Soldier  Pile  and  Lagging  * 

*  In  Accordance  with  NAVPAC  DM-7  * 

*  * 

************************************************ 

I.  WALL  PROPERTIES 

1.  Engineer:  D* Amanda 

2.  Project:  Clay  Example  #2 

3.  Date:  21  September  1991 

4.  The  elevation  of  the  top  of  the  excavation  is 
1637.00  feet. 

5.  The  elevation  of  the  bottom  of  the  excavation  is 
1614.00  feet. 

6.  The  number  of  anchors  is  2. 

The  anchors  are  located  as  follows: 

Anchor  Elevation  (feet) 

1  1630.00 

2  1620.00 

7.  The  spacing  of  the  soldier  piles  is  6.00  feet. 


II.  SOIL  PROPERTIES 

8.  The  elevation  of  the  water  table  is  1637.00  feet. 

9.  The  soil  properties  are  as  follow: 

Soil  Type  Elev  Unit  Wt  Friction  Angle 

or  Cohesion 

clay  1637.0  0.0626  0.75 

10.  The  slope  of  the  ground  behind  the  wall  is  0 
degrees . 

11.  The  surcharge  load  is  0.000  ksf. 

12.  The  strip  load  is  0.00  ksf,  0.00  feet  long, 
and  located  0.0  feet  from  the  wall. 

III.  HALL  ANALYSIS  RE  S  U  L  T  S 

13.  Estimated  width  of  the  soldier  pile  is  0.75  feet. 

14.  Factor  of  safety  for  passive  resistance  is  1.5. 

15.  The  wall  was  excavated  1.0  feet  below  the  proposed 
anchor  location. 
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STAGE 

ZERO 

SHEAR 

(ft) 

MAXIMUM 

MOMENT 

(k-ft) 

SECTION 

MODULUS 

(in"3) 

EMBEDMENT 

DEPTH 

(ft) 

REACTION(S) 

(kips) 

1 

0.0 

0.00 

0.00 

0.0 

... 

2 

23.5 

5.39 

2.24 

5.1  R1 

=  4.26 

3 

20.0 

41.81 

17.42 

4.4  R1 

=  65.60 

R2  =  65.84 


NOTE:  Stage  1  moment  based  on  Kiewit  criteria  is  0.0 

kip-f t . 

Stage  2  moment  based  on  Kiewit  criteria  is  16.5 
kip-f t  and  reaction  force  is  2.5  kips. 

NOTE:  Minimvun  depth  of  embedment  based  on  maximum 
moment  is  4.4  feet. 

NOTE:  NYCTA  recommends  minimum  penetration  depth  of 
six  feet. 

NOTE:  A  effective  stress  analysis  approach  was  used. 
END  OF  ANALYSIS 
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